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COMPUTER GAMES 
OF TOMORROW 


AVOID “= CAPTUR 
OTHER SHIPS 


aR Ke 


“SKRAMBLE- 





KONG £7,935 


4 SGREENS WITH BRILLIANT ANIMATED GRAPHICS. 











SKRAMBLE J|S. £7.95. | | 
HEXPE| TO TEST UR SHRILL. h 
HEXPERT J.S. £7.95 INDIAN ATTACK £5.95 GQ. 


TRAIN BERT TO BE HEXRERTYON THIS 3D HEXAGONAL PYRAMID. 


MOON BUGGY J.S. £79 


MANOEUVRE YOUR PATROL {RAFT OVER GIANT POT HGLES AS/ 
YOU DEFEND THE MOON BUGGY FROM ALIEN ATTACK. 


FROG RUN a 
A 


OPULAR ARCADE GAME. FI 










COSMIC COMMANDO £5,95 
VENGEANGE OF ZENO £5.95 


24 HR. CREDIT CARD SALES HORLEY (02934) 6083 








3D TIME TREK | K.6./7J.5. 5.95\ PAYMENT BY CHEQUE, P.O., ACCESS/VISA 
SPECTACULAR 3D GRAPHIC$ §TAR TREK GAME. \ 8 HIGH STREET HORLEY. SURREY 
DUNGEONS K\B. £6.95 : fay 

ENTER THE REALMS OF FANITA$Y IN THIS ROLE PLAYING GAME. | Overseas 50p post & packaging 

DARK DUNGEON K.B. £6.95 ) 


TRADE ENQUIRIES WELCOME 
HEARTED. fe 29 West Hill Dartford Kent. (0322) 92513/8 
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Computing Today is constantly on 

the look-out for well written ar- 
ticles and programs. If you think 
that your efforts meet our stan- __ 
dards, please feel free to submit _ 
your work to us for consideration. 

All material should be typed. 
Any programs submitted must be 
listed (cassette tapes and discs will 
not be accepted) andshouldbeac- __ 
companied by sufficient documen-  __ 
tation to enable their implementa- 
tion. Please enclose an SAE if you 
want your manuscript returned, all 
submissions will be acknowledg- 
ed. Any published work will be 

‘paid for. 

All work for consideration should _ 
be sent to the Editor at our Charing 
Cross Road address. 
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yuare, London WC1 3AB. 
-437 0626. Telex 8811896. — 


CONSUMER NEWS....6 


All the latest information about new 
hardware for the personal computer 
owner. 





Just wait till you see what we've got for 
you this month! Something a bit 
classical: ., 





| USING MX-80 


GRAPHICS 15 


It you've ever looked at those 3-D plots 
of ‘raindrops’ and wondered how you 
could do the same thing — here's 
how. 


SPECTRUM MACHINE 


Faced with a major bit of machine 
code programming on the Z80, our 
reviewer went seeking helpful books 
and assemblers. 


GETTING MORE FROM 
THE 64 PART 3........ 24 


In the final part of this short series, our 
pair of programmers examine the 
sound facilities (and the misprints 
about them in Commodore's manual). 


BOOK PAGE........29 
Pascal, LISP. FORTH. ‘the Fitth Gen- 


eration, expert systems — it's all in our 
book review this month. 


COLOUR GENIE 
MONITOR <4... 














.. 383 


If you own a Colour Genie and you 
want a decent monitor with useful and 
friendly facilities, look no further than 
this article. 


LEARNING FORTH 
PART 4 


This month we explain a bit more 





about defining words and look at a 


way to dimension and use arrays, just 
like BASIC. Finally, we have an 
aMAZEing example. 









NON-RANDOM 
RANDOM 
NUMBERS. 2000.23. 


Sound like a contradiction in terms? 


Well, ifyouwantasequence that looks 


random but is easily reproducible, this 
routine will do it for you with little 
memory overhead. 


LOSTOCK SCREEN 
EDITOR 


Statement of fact: editing programs on 
the Apple is awful. We look at a com- 
mercial utility program that provides 


BBC-like editing. 


SOME NOTES ON THE 
APPLE PART 2... oo: ol 


This month we raise the tone of the pro- 
ceedings by introducing unequal 
mark-to-space ratios into the Apple 
sound wavetorms. 


ZX81-FORTH 


By replacing one component in your 
ZX81 you can tum it into a fast, 
multitasking machine. Soundtoo good 
to be true? Read on. 


TWO PET 
UTILITIES 


Two small programs for the PET user. 


PRINTOUT 


A sample listing of our mailbag. 


PROGRAM RECOVERY 
ON THE COMMODORE 
ee ee Ae ee bd as oe 64 


If you've ever stared at a latched-up 
machine and wondered how to ret 
rieve that 20K program you've just 
typed in, this is for you. 
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Cl mtenadras 2.0. 2. Ze ee 28 
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ZX81 - FORTH ROM 


with multi-tasking 


Runs more than 10 tasks at once. Schedule tasks 
to run from 50 times per second to once a year. Ideal 
for control purposes. Three times faster than fig- 
FORTH, but fig compatible. Available as a ‘fit-it- 
yourself’ EPROM, with an extensive manual for £25 
plus VAT. Some ready-converted ZX81's available. 


Coming Soon! 


FORTH-I/O cartridge for Spectrum £59 plus VAT. 
Ask for details 


David Husband 


2 Gorleston Road, Branksome, 
Poole BH12 1NW 
Telephone: 0202 302385 


















TRANSFORMS THE COMMODORE 64 
INTO A FULL-FEATURED AND 
PROFESSIONAL DATABASE 
SYSTEM! WITH UP TO 1000 
CHARACTERS PER RECORD ON UP 
TO 4 SCREENS... AND UP TO 





128 ITEMS PER RECORD; 
SUPERBASE EVEN HAS SPREADSHEET AND CALCULATOR CAPABILITY, CALENDAR 
IS ESSENTIAL IF YOU WANT THE MOST FROM YOUR 64! SUPPLIED ON CBM 1541 DISK 
NOW AVAILABLE ON CARTRIDGE, 

VIZAWRITE 64 
PROCESSOR, WITH ON-SCREEN 
AND EASY-TO-FOLLOW USER MANUAL, VIZAWRITE OFFERS THE ULTIMATE IN PERSONAL 
@ OUR PRICE ONLY B2995 £68! 
AND BASIC IV Too! PLUS PROGRAMMER'S TOOLKIT, 
CONTROL, STRING FUNCTIONS, DISK DATA COMPRESSION, SCREEN PLOTTING, SCREEN 
A FULL USER REFERENCE MANUAL, QUICK REFERENCE GUIDE AND DEMO PROGRAMS. ALSO 


DEFINABLE AS KEY, TEXT, 

FUNCTIONS, EASY INPUT FROM WORDPROCESSOR/DATA FILES, BOTH MENU-DRIVEN AND 
WITH EXCELLENT TUTORIAL/REFERENCE MANUAL. EX-STOCK NOW! 

VIZAWRITE 64 IS A HIGH- 

FORMATTING, THAT TAKES FULL ADVANTAGE OF THE 64'S COLOUR, GRAPHICS AND 
COMPUTER WORD PROGESSING! ALSO AVAILABLE ON DISK (OUR PRICE £7945 £65!), OR 
MASTER 64 IS A TOTALLY NEW 

CONCEPT... A COMPLETE PROGRAM 

as ! ; DEVELOPMENT PACKAGE, THAT'S 

MACHINE CODE MONITOR, BUSINESS BASIC, KEYED DISK ACCESS, SCREEN MANAGEMENT, 
DUMP, OPTIONAL SOFTWARE PROTECTION KEY, AND MORE... IN FACT EVERYTHING YOU 
AVAILABLE FOR CBM 700 (£339.25) ano CBM 4032/8032/8096 (£359-25- £225!). 


NUMERIC, CONSTANT, RESULT OR DATE... IN FILES OF UP TO 16M CHARACTERS! 
PROGRAM OPTIONS, SORTING/SEARCHING, FULLY DEFINABLE OUTPUTS... SUPERBASE 64 
@ OUR PRICE ONLY T3>n25 £88! 
PERFORMANCE, LOW-COST WORD 
MEMORY FEATURES... AND SUPPORTS VIRTUALLY ANY PRINTER! WITH A COMPREHENSIVE 
COMBINED WITH VIZASPELL (OUR PRICE £99706-£85!). 
AVAILABLE NOW FOR THE CBM 64. 

MASTER HAS 85 NEW COMMANDS... 
USER-DEFINABLE INPUT ZONES, REPORT, GENERATOR, 22-PLACE ARITHMETIC, DATE 
NEED TO PROGRAM YOUR 64 TO TOP PROFESSIONAL STANDARDS! MASTER 64 COMES WITH 
@ SPECIAL OFFER PRICE Db £7154 









THESE ARE JUST SOME OF OUR FINE SOFTWARE PRODUCTS FOR COMMODORE COMPUTERS... 
PLEASE TELEPHONE OR WRITE FOR FREE DATA SHEETS! PRICES SHOWN INCLUDE 15% VAT 
AND ARE CORRECT AT TIME OF GOING TO PRESS. ORDER BY POST/TELEPHONE/PRESTEL; 
USING CHEQUE, ACCESS, BARCLAY CARD OR OFFICIAL ORDER. TELEPHONE 01-546-7256 
FOR SAME-DAY DESPATCH! PoST FREE EXCEPT ON CREDIT/OVERSEAS ORDERS. (REF A23) 


Lalco Sotiware 


LAKESIDE HOUSE, KINGSTON HILL, SURREY KT2 7QT TEL 01-546-7256 





YOUR MICRO COULD TEACH YOU 


A THING OR TWO ABOUT THE FRENCH... 
..OR THE GERMANS...OR THE SPANISH 


Pow ale}aat-mexelan) elon -iailcw-1an=).40l>1arc})\Z-mce)\ae- late mim e)t-Nalale 
games is all you do with it, a toy is all it is. : 
Now, using the New Personal Computer 
10] el-1a(=y-laallale mon acd (>) 00m (ea Oroted MYZOlU Rer-lamar-Nomielamy atin 
WAolel am anlielcom-valem(=t-ldamcvelaat=italiarem-lmdalcmct-laal-m(laalee 
ma Ororoul-lalelel-lel- mere] 0) acx-1mere) ga] el diciom PA Sotcre) alome) a 
SH: (Uo |(omor-tt-1-)0C-1MUi-10 Mlamere)al[Olavertielam Uitan-mielelacal 
Yo) i WV E- Ug -Mer-tot-1-1 4 (oom Coe-Lolom- Walon wmelaatslarci(e)amcenist-laallarep 
Initially the software package enables you to see 
the words you’re learning; then, as your vocabulary 
develops, it will test your skill in your new language. 
Anyone can learn this way — no previous knowledge 
me) Mial-ml-laleler-\el-mr-ma-vel0||q-10 mm Bal> mel allel 0(-m el @totomanl-tialele, 
develops your overall learning and memory skills ina 
Ec WVam tal-4 sy ole) Cama -it-b lave m-lalem-say(e)\z-1e)(= 
=t-\o] aM aa @rotoml-lale[0r-(e [= ef- (0), Gaal al d=) ale aM el-)aant-lame)s 
Sy oF-Tal fo) alia relents Uatce- Mere)aal ole1al-larci\a-m elele) di- me l-ie-Uii ale] 





ial= Ar- (0 (0 | (on (-s-s-1e) alow-lalomcalo mae avent(e)ame)miatoelanc-e-(e1 thas 
Yo) aay\F-1ag-me ave lelidre)ars\ihaeatom elele).d(-1m-)-4er-lalelmelamial=) 
broader benefits of the PCSS method. 

At only £29.95 per pack PCSS costs less than other 
late)aat=mt-larelor- (elo mere) | a-y-1om2-1 a) mehac=)ecmanlelelamanlelaca la 
(1a ahome) m-xo [0 ler-hilelam-lalem-lal(e)\,nal-lale 

(@xeoyan) o)(-3¢-mdal-merele] ele)amel-1e))'a-lale Mia mad Oroto miele 
yourself — you'll be amazed what your micro can 
teach you. — 


Send your cheque or Postal Order for £29.95 made payable to: 
MDA Modon Associates Limited, 561 Upper Richmond Road West, 
London SW14 7ED. 


or, alternatively telephone Teledata 01 200 0200 and quote your Visa, 
Diners Club, Access or American Express number. 


Tick which Audio/software package you require. (Prices include VAT. 
Add £1.45 for postage and packing on each order.) 


Please supply the following Audio/software Packages 
FRENCH [ ] GERMAN [ ] 


SPANISH [_] i 


Name: 





Adaress: 





COMPUTERISED EDUCATION SYSTEMS 


(PCSS software is compatible with the ZX81 (16K), ZX Spectrum, BBC Micro, 
Acorn Elektron Micros.) 
x= Con am o- Lol @exolant-s-M wih dam- Mil | maslelat-a'm of-CeL@eley-le-lahd-t-mbmave) mexe)anl o)(-3 (<1 cr-Leitil=re pl 
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GET YOUR HANDS 
ON ONE... 
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Spectravision Quickshot 
deluxe joystick (BBC compatible) 


Now, Microstyle offer you the chance to use a joystick 
where joysticks have never been used before! Operating 
directly through the existing user-ports on your BBC 
model B microcomputer and available for use with all 
Acornsoft and most other keyboard controlled games 
even Planetoids — these joysticks include a 
machine-code ‘driver program’ on tape, which converts 


keyboard commands to remote control operation for 
maximum enjoyment. 


only £19.95 inc vat 


| for mail order please add 75p P&P 
| 








| The Aylesbury Computer Centre The Bath Computer Centre 
| 92 Friar’s Sq., Aylesbury. 


29 Belvedere, Lansdown Road, Bath. 
Telephone: Aylesbury (0296) 5124 Telephone: Bath (0225) 334659 


The Daventry Computer Centre 


The Newbury Computer Centre acer east eect ont side 0 
67 High St., Daventry. 47 Cheap Street, Newbury. | agen thet ciiteese’are otierad ter antes 
Telephone: Daventry (03272) 78058 = Telephone: Newbury (0635) 41929 





Subject to availability from manufacturers 


..BEFORE THEY DO! 








News: General products 











CONSUMER NEWS 


SV ARRIVAL a 


The powerful Spectravideo range of 
personal computers, currently enjoy- 
ing a huge sales success in the US, is 
now available for the first time in the 
UK. Distributed exclusively by CK 
Computers of Weston-super-Mare, 
Avon, the Spectravideo range com- 
prises two models, the SV318 and 
SV-328. 

A major selling feature of both 
Spectravideo machines is their 
adoption of the MSX specification, 
which is expected to become the 
industry standard for home com- 
puters. MSX uses Microsoft BASIC as 
its resident interpreter and gives 
access to a wealth of computer 
games and other personal computer 
software. In addition, the SV-318 and 
the SV-328 are also CP/M compat- 
ible, which means that as users 
demands become more sophis- 
ticated they can take advantage of 
the comprehensive range of software 
programs written for CP/M such as 
Wordstar and Visicalc. 

A further very important factor is 
that Spectravideo have a range of 15 
add-on peripherals including RAM 
expansion cards, floppy disc drive, 
graphics tablet and printer. All of 
these are available now from CK 
Computers, which makes a nice 
change from other makes. 

The SV-318 at £173 complete 
with data cassette is extremely com- 
petitively priced for a personal com- 
puter with these features and a 
memory capability of 32K RAM 
expandable to 144K RAM and 32K 
ROM expandable to 96K ROM. The 
SV-318 also has a joystick built into 
the keyboard, another unique fea- 
ture in this price range. 
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For the professional businessman 
the model SV-328 (priced at £239 
complete with data cassette, 80K of 
RAM expandable to 256K and 48K 
ROM expandable to 96K) represents 
a long term investment which allows 
memory to grow as the users require- 
ments increase. Main features 
include an 87-key keyboard, 80- 
column display and numeric keypad, 
and 256 by 192 pixel screen resolu- 
tion. CK Computers Ltd are at 6 
Devonia House, High Street, Worle, 
Weston-super-Mare, Avon BS22 OJR 
(telephone 0934 516246). 
Computing Today will shortly be 
receiving a Spectravideo computer 
for review. Watch these pages! 


BYN\Vin@; AV) =i se v 


Linear Graphics Ltd have announ- - 
ced a £450 plotter for personal com- 
puters that employs new linear motor 
and optical feedback technology to 
achieve repeatable 0.2mm accuracy 
over the whole of the plotting area. 
Known as the Beaver, the plotter is 
the result of an intensive develop- 
ment and production engineering 
program at Linear Graphics that has 
spanned the past year or so. 














The Beaver has a Centronics 
interface as-standard (RS232 
optional), and can therefore be used 
with practically any computer. 
Special software is available, at: 
additional cost, for the BBC models 
A andB, and Apple Il and Ile 
machines. This software is called 
‘Interceptor and has been de- 
veloped concurrently with the plotter 
by Linear Graphics. 

Interceptor is a powerful routine 
that intercepts graphic commands 
for plotting and drawing from BASIC 
and routes them either to the screen 
or the plotter as required by the user. 
As a result, graphics programs al- 
ready written for the BBC or Apple 
PCs can run with the Beaver with 
little or no modification. 

The combination of a universal 
pen holder and a PEN CHANGE 
command allows most popular 
‘Roller Ball’ or fibre-tipped pens to be 
used. The PEN CHANGE command 
causes the pen holder to move to a 
pen change position on the bed, 
making it very easy for the user to set 
the pen at the correct height in the 
holder. 

The Beaver is a flat bed machine 
with a plotting range of 190 x 272 
mm (A4) and will draw on paper, 
transparencies for overhead projec- 
tion or even on the backs of 
envelopes! The paper, or trans- 
parency, is held in position by - 
magnetic rubber strips. Accuracy is 
better than 0.2 mm regardless of the 
distance moved. 

At the righthand edge of the 
plotting bed there are a number of © 
switches for manual control of the 
plotter. These include North, South, 
East, West, Pen Down, Pen Up, and: 
Line/Local. 

The Beaver measures 302 x 381 
x 97 mm and weighs in at only 8 kg. 
Further information can be obtained 
from Linear Graphics ltd, 34a Brook 
Road, Rayleigh Weir Industrial 
Estate, Rayleigh, Essex (telephone 
0268 741322). 


THE SEEING EYE * 


A low cost video-camera-to- 
computer interface aimed at the 
educational and semi-professional 
user has recently been launched by 
Educational Electronics. The inter- 
face accepts signals from a variety of 
sources such as a video camera, 
VHS player and video disc. It can 
digitise an image with a resolution of 
220 (horizontal) by 312 (vertical) pix- 
els with 64 levels of grey. The unit 
has wide applications in the fields of 
art, design, science, robotics and 
technology. 

The low cost of the Video Inter- 
face has been made possible by 
replacing many functions usually 
performed by hardware with appro- 
priate software. This also greatly 





COMPUTING TODAY FEBRUARY 1984 











enhances flexibility as the software 
can enable various parts of the 
image to be selectively scanned, 
giving more detail or detecting rapid 
movement in certain defined areas. 
Trade-offs can also be made be- 
tween computer memory size, num- 
ber of pixels scanned and the 
number of bits per pixel (represent 
ing the intensity) stored in memory. 
The information can then be dis- 
played on a monitor, saved to disc or 
processed to extract specific infor- 
mation (such as area and perimeter 
analysis, shape recognition etc.) In 
addition the ability to attribute a 
specific colour to a particular inten- 
sity (ie the use of ‘false colour) can 
be used to highlight certain features 
of the image. 

The Interface can be used on vir- 
tually any micro with a user port. The 
unit comes complete with mains 
power supply, extensive documenta- 
tion, software support and a connect- 
ing lead for the BBC Model B, RML 
380/480Z or Apple user port. The 
cost is £174 (excluding VAT) and 
further details can be obtained from 
Educational Electronics, 30 Lake 
Street, Leighton Buzzard, Beds LU7 
8RX (telephone 0525 373666). 


MINI-MODEM - 

Tech-Nel Data Products Limited has 
launched a low cost ultra-miniature 
short-range modem, the SRM-6, 
which costs about one quarter of the 
price of an equivalent conventional 
modem and measures just 4.5 x 2.2 
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x 10.6 centimetres. The SRM-6 is 
ideal for short haul data transmission, 
up to 25 kilometres, and needs no 
AC power supply or batteries. It is 
therefore extremely suitable for use 
in large office and factory 
complexes. 

The SRM-6 plugs directly into 
standard CCITT V-24/RS-232C 
terminals or computer digital inter- 
face connectors. It takes its power 
from signals emitted by the terminals 
and from transmit and receive 
signals, so that no external power 


source is required. Data is transmit- 


ted in full duplex and for wire 
asynchronous modes over uncon- 
ditioned telephone lines at any rate 
up to 19,200 bps. 

SRM-6 modems are available by 
mail order from Tech-Nel in bubble- 
packed sets of two at prices trom 
£140 per pair, or even less from 
quantity purchases. Tech-Nel Data 
Products Ltd are at 8 Haslemere 
Way, Banbury, Oxon OX16 8TY 
(telephone 0295 65781). 
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DON’T WASTE YOUR 





TIME < 


Printing out directly from a computer 
to a printer ties up the computer, 
often when you most need it. The 
new compact Microbuttfer trom Inmac 
can store up to 64K bytes (or approx- 
imately 30-40 pages of A4 text) in its 
memory as fast as the computer can 
dump it. This is then fed into the prin- 
ter at its slower rate, completely tree- 
ing the computer to do other 
operations. 

The Microbutfer is compatible 
with most microcomputers including 
IBM PC, Apple, TRS-80 and with 
leading manutacturer's printers such 
as Epson, NEC, Diablo, C. Itoh and 
Centronics. It can also be used with 
most makes of plotters and modems. 
No moditications are required to the 
existing software and connection is 
by standard plugs and cable. 

There are two versions of the 
Microbutter available which both 
have a data transfer rate of 4000 
cps and cost £225 each (including 
an AC adaptor). The parallel version 
comes with a 2 m butter-to- printer 
cable. The serial version uses stan- 
dard RS232 (V24) cable interfaces, 
has two handshake modes, nine 
baud rates and a bypass feature for 
instant printer access. 

As with all Inmac products, the 
Microbutfer comes with a full one 
year guarantee and is available on a 
30 day risk-free trial period and with 
next day delivery. Full details can be 
found in Inmac’s full colour cata- 
logue which is available tree from 
Inmac (UK) Limited, Davy Road, 
Astmoor, Runcorn, Cheshire WA7 
1 OF (telephone: 09285 67551). 





PODS DOWN IN PRICE 


Oxford Computer Systems have 
reduced the price of Interpod — their 
interface system for the Commodore 
64 — to £99.95. 

Interpod is an intelligent interface 
that provides the Commodore 64 
with both RS232 and JEEE interface 
capabilities. Thus users of Com- 
modore’s latest home computers are 
able to take advantage of the wide 
range of peripherals such as dual 
disc drives and daisy-wheel printers, 
and hence extend the capabilities of 
their system in a low-cost and power- 
ful manner. 

Interpod is available from Oxford 
Computer Systems, trom the UK net- 
work of Commodore dealers or from 
the world-wide network of dealers 
and distributors for £99.95. For 
further information please contact 
Oxford Computer Systems Limited, 
Hensington Road, Woodstock, 
Oxford (telephone 0993 8127700). 














Fd in ®)/2 || U, 280-BUS MULTIBOARDS 


GM811—CPU Board 


* 4MHzZ80A CPU 

* 4‘Bytewide’ Memory Sockets 
* 2x8-Bit Input/Output Ports 

* 8 Bit Input Port 


* RS232 Serial Interface hy | 25 
* Cassette Recorder Interface 


GM803—EPROM/ROM 
Board 


* Up to 40K of Firmware 
3 2708 oF 2716 EPROMS £65 
* Page Mode Operations 


























GM813—CPU/64K RAM 
Board 


GM812-—Video 
Controller Board 






























* AMHZZ80AC.P.U. * 64K Dynamic RAM * 80 Charactersx25 Line Display Format GM802—64K RAM 
* RS232Interface  * Two8-Bitl/O Ports * On-board Z89A Microprocessor 
* Cassette Interface * Buffered Keyboard Input Board 


* Extended & Page Addressing Modes * Programmable Character Generator * 64K Dynamic RAM 
* 4MHz Operation 


* CPIM Compatible C225 * 160x75 Pixel Graphics ¢ 
Monitor * Light Pen Input 125 + RAM Disable Function C4 25 
e * Page Mode Operation 
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* 32K Static RAM 


* Battery Backup C225 
* Page Mode Operation 


EV814—IEEE488 (GPIB) 
Controller 


* Cost Effective Controller 
* Comprehensive Software 
Supplied 


* Fulllmplementation £4140 
* Easy To Use 


GM827-—87 Key 
Keyboard 


* User Definable Function Keys 


* Numeric Keypad £85 
* Cursor Control Keys 


GM839-—Prototyping 
Board 


* FibreglassP.C.B. 
* 80-BUS Signal Identification 


or 642 BO 


MULTIBOARD COMPUTERS 
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GM829—Disk 
Controller Board 


* Up To 4 Mixed 5.25 & 8" Drives 

* SASI Hard Disk Interface 

* Single & Double Density Operation 
* Single & Double Sided Drive Support 


* Supports 48 and 
96 TPI Drives £445 













GM816—Multi I/O 
Board 


* 61/O Ports 

* 4Counter/Timer Channels 
* On-Board Real Time Clock 
* Battery Backup 


* Further Expansion ¢ 4 25 
Capability 


PLUTO—Colour 
Graphics Board 


* On-Board 16 Bit Microprocessor 
* 640x576 Bit Mapped Display 
* 192K Of Dual Ported RAM 


* Comprehensive £499 
On-Board Software 


CLIMAX—Colour 
Graphics Board 






































































GM833—RAM-DISK 






















Board : pie ae Pixel Display UHF Version 
olours 
* Virtual Disk Operation * 542K Dynamic RAM * Ultra-fast Vector & c 4 9G All the boards and components inthe 80-BUS 
* Port Mapped For Easy Interface Software Character range are fully compatible and offer a very 
Generation flexible and cost effective solution to your 






computer needs. For further information about 
the 80-BUS range contact your nearest 
MICROVALUE dealer. 


* Over 10 Times Faster 

Thana Floppy Disk 
Please note: This board cannot be used asa 
conventional RAM board 


* Light Pen Input UHF & RGB Version 


* UHF or RGB Outputs ¢220 
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Power Supplies, 
Mother Boards 
& Frames 


* GM807 3A Power Supply £40.00 
* GM817 6ASwitch ModePS.U. £75.00 
* GM843 10ASwitchModePs.U. £95.00 
* GM656 3SlotMotherboard £5.00 
* GM654 5SlotMotherboard £6.00 
* GM655 8SlotMotherboard £10.00 
* MP840 414Slot Motherboard £47.00 
* GM662 5BoardFrame £50.00 
* GM610 19" Frame £37.50 


__— 
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Galaxy 2 

“| would place the Galaxy atthe 
top of my list” 

(Computing Today, April 1983) 
* Twin Z80A Processors 

* CP/M2.2 Operating System 

* 80x25 Video Display 

* 64K Dynamic Ram 

* LightPen Interface 

* Upto 1.6Mhz Disk Capacity 

* Serial RS232 Interface 

* Parallelinterface 

* Numeric Keypad 

* Definable Function Keys 

* Cassette Interface 

* 12" Monitor Included 


from £1495 
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Quantum 
System 


Computerise 
Without Compromise 


* 80-BUS Construction 

* Serial & Parallel Interface 
* Stylish Design 

* Up To 2.4Mhz Disk Capacity 
* Up To Three 5.25" Drives 

* Fully Expandable 

* Twin Z80A Processors 

* CP/M Operating System 

* 64K Dynamic Ram 

* Definable Function Keys 


Two-Drive 
Quantum 


£1910 


Gemini Multinet 


The Gemini Multinet enables as many 
people as possible to have access to their 
own microcomputer with mass storage and 
printer facilities for the lowest possible cost. 
This is achieved by providing a central 
‘fileserver’ fitted with a Winchester hard disk 
unit and printer interfaces, in conjunction 
with a method of interconnecting up to 
thirty-one workstations to the fileserver. The 
fileserver and each station are fitted with the 
Gemini GM836 network interface board. 
AMicropolis 800K floppy disk crive is 
incorporated in the fileserver providing 
backup for the hard disk. 


GM910 Galaxy 4 Multinet 
5.4Mibyte fileserver 
GM%2 Galaxy 4 Multinet 
40.8 Mibyte fileserver 


GM909 Galaxy 4 Multinet 
workstation 





£2600 
£2850 
£650 


Both fileservers and workstations are supplied 


complete with VDU's; the operating software 
issuppliedwith the fileserver. 








Phoenix 3 
P42 : 
Monitor —— 


Ahigh quality 12” data display monitor, 
ideal for Gemini systems. The P12 is 


available in both green and £95 
















~ 


amber phosphor versions and 
has a resolution of 20Mhz. 










BUY FROM THE 
COMPUTER 
PROFESSIONALS 






MICROVALUE 
DEALERS: 


AMERSHAM, BUCKS 
Amersham Computer Centre, 
48 Woodside Road, 

Tel: (02403) 22307 


BRISTOL 
Target Electronics Ltd., 16 Cherry Lane. 
Tel: (0272) 421196 


EGHAM, SURREY | 

Electrovalue Ltd., 

28 St. Judes Road, Englefield Green. 
Tel: (07843) 3603 


LEEDS 

Leeds Computer Centre, 

55 Wade Lane, Merrion Centre. 
Tel: (0532) 458877 


LONDON W2 
Henry's Radio, 404 Edgware Road. 
Tel: 01-402 6822 


LONDON SW11 

OFF Records, 

Computer House, 58 Battersea Rise, 
Clapham Junction. 

Tel: 01-223 7730 


MANCHESTER M19 
EV Computing, 700 Burnage Lane. 
Tel: 061-431 4866 


NOTTINGHAM 

Computerama, (Skytronics Ltd.) 
357 Derby Road. 

Tel: (0662) 781742 


Telephone orders welcome 








_____ REAL value — from the Professionals 





News: Commercial software 




















SOFT WARES 


BRAIN(STORM), NOT 





BRAWN 


This magniticent specimen of 
humanity is Mike Liardet, and he is 
the co-author of BrainStorm, an 
‘ideas processor in the same way 
that a word processor processes 
words and a spreadsheet processes 
numbers. | suppose that makes him a 
bit cleverer than the rest of us mor- 
tals, but frankly I feel that anyone 
who volunteers for a photograph like 
this isn't dealing with a full deck, if 
you know what I mean. Computing 
Today is, at this very moment, pre- 
paring a review of this software 
package, and | suspect other 
people may be working a report of 
Mr. Liardet's mental state. 

That whirring noise is Rodin 
spinning in his grave. 


MORE DISCS FROM 





MOLIMERX 


Molimerx are pleased to announce 
that they have been appointed sole 
distributors for CP/M 2.2 for the 
Tandy Model 4 outside the United 
States. This version from Montezuma 
Micro is a full CP/M with the original 
Digital Research utilities, plus a num- 
ber of others. 

Of particular importance is a file 
which enables this CP/M to interface 
with 22 other formats of CP/M. 
Additionally, a utility is included 
which converts an area of RAM into a 
pseudo disc drive. Communications 
and terminal software are also 
included. The present Tandy owner 
will be particularly pleased that an 
extremely easy Format and Backup 
utility is also included. 

This version of CP/M is intended to 
fill the gap in time pending the issue 
of the CP/M being written for Tandy 
by Digital Research. If, when that is 
released, it is found to be superior to 
the Montezuma version, then the lat- 
ter will be discontinued. On the other 
hand if, as it rather appears at the 
moment, the Montezuma is superior 
to the Tandy, then Molimerx will 
stock both. 

Molimerx have also concluded a 
licensing agreement with Logical 
Systems Incorporated of Milwaukee, 
United States, the publishers of 
LDOS, the disc operating system for 
the Tandy Model I, Model III and 
Model 4 machines. This new agree- 
ment will enable Molimerx to manu- 
facture in the United Kingdom 
products to be sold worldwide outside 


of the continental USA. 

The agreement will also enable 
Molimerx to make a major break- 
through in pricing. Henceforth all LSI 
products, including LDOS, smal- 
LDOS, The Basic Answer and other 
well-known packages will be sold in 
the United Kingdom to the end user 
at the pound equivalent of the US 
retail price. In other words, there will 
be no reflection in the new pricing 
schedules of Customs duty or 
shipping. 

It is believed that this is the first 
time in the software industry that the 
price in the United Kingdom will be 
the same as that in the USA. 

Molimerx Ltd is at 1 Buckhurst 
Road, Town Hall Square, Bexhill-on- 
Sea, East Sussex (telephone 0424 
220391 (223636): 


GEMINI GRAPHICS — | 


Henry's of Edgware Road has 
extended its range of available 
software packages with the introduc- 
tion of IVC HI-RES, a program which 
provides pseudo high resolution 
graphics on 640 by 250 matrix. 

IVC HE-RES has been specially 
written for the Gemini Multiboard 
computers, the Gemini Galaxy 


range, the Quantum 2000, the 
Kenilworth Personal Computer and 
CP/M based Nascoms fitted with the 
Gemini GM 812 IVC. It achieves 
pseudo high resolution graphics by 
reprogramming the video control 
processor and mapping the pro- 
grammable set generator to the 
screen. 

Available from Henry's at £15 
plus VAT, IVC HI-RES provides the 
following commands: Select mode 
(48 or 80 column); clear graphics 
screen; select decimal or binary co- 
ordinates; set, reset, invert and test 
point X, Y; line set, line reset and line 
invertline: XY tort YT. 

Henry's can be found at 404-406 
Edgware Road, London W2 1ED 
(telephone (01-402 6822). 


Miteise)e)s ila = 
BUDGETTING 


With the recent introduction of the ZX 
Microdrive you now have the ability 
to load the Cash Controller program 
and make an entry in around 90 
seconds. This upgrades the pertor- 
mance of the 48K Spectrum for more 
serious roles. 

Richard Shepherd Software have 
just released a professional-style 
Cash Controller program (believed 
to be the first) that has a “SAVE-to-ZX 


Microdrive” option in the main menu. 





The obvious advantage of this Mic- 


rodrive capability is that it allows the 
user to SAVE the program onto a 
blank Microdrive cartridge when 
supplies are more readily available. 

This home budgeting and bank- 
ing system handles up to 400 tran- 
sactions which can be automatically 
allocated against 16 selected 
budget headings such as Rates, 
Gas, Tax and so on. The program 
also gives statements on demand. 

Cash Controller for the 48K 
Spectrum with ZX Microdrive com- 
patibility costs £9.95 and is now 
available by mail order, telephone 
credit card order or from most lead- 
ing computer stores. Contact 
Richard Shepherd Software, Elm 
House, 23-25 Elmshott Lane, Cip- 
penham, Slough, Berks (telephone 
06286 6353 1). 
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LEARN WITH GRIFFIN 


Griffin Software, part of Griffin & | 
George, has launched a new range 
of educational programs for use on 
home computers, for young children. 
in the 4-9 age bracket. There are, 
initially, six programs taking the form 
of instructional booklets for parents 
plus computer software tapes attrac- 
tively packaged and colour-coded. 

The new range of Griffin Software 
children’s educational programs is 
for use initially on two types of home 
computer — the Sinclair ZX Spec- 
trum 48K and BBC Model B 32K mic- 
rocomputers — which together con- 
stitute some 60% of the total UK 
home computer market. The 
educational software: will, however, 
be progressively extended to other 
home computers as appropriate. 

Four of the new home computer 
programs for 4-9 year olds are avail- 
able from Smiths, Boots and other 
leading retail outlets now — ‘Word: 
spell (spelling); ‘Getset’ (numbers); - 
‘Numbertun’ (addition and subtra- 
tion); “Tablesums’ (multiplication), 
while the other two programs — 
‘Fairshare’ (division) and ‘'Word- 
games (more advanced spelling) — 
will both be in the shops by the end 
of November. 3 

The’ six programs, with colour- 
coded packaging — blue for soft- 
ware for use on the Sinclair ZX Spec- 
trum and green for the BBC Model B 
microcomputers — are priced at 
£7.99 tor Spectrum and £9.95 for 
BBC Model B. 


ALLIGATA DATA 


Flexibase, Alligatacalc and Scribe II 
are three home/business ‘utilities for 
the BBC Model B now available from 
Alligata Software, of Sheffield. 
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Flexibase is, as the name sug- 
gests, a flexible master database. 
Available on tape and disc, Flex- 
ibase enables users to extend the 
number of records they can hold by 
selecting the number of fields in 
each record and then the number of 
characters in each field. Output is to 
either screen or printer. All records 
can be sorted alphabetically on the 
first tield, with a secondary sort on 
any of the first 10 fields in preferred 
order. (RRP is £9.95 on tape; £13.95 
on disc). 

Alligatacalc is a simplitied 
financial/accounting package 
designed specifically for the BBC to 
handle the following tasks: cash flow 
forecasting: budgetary control: 
estimating; price lists; discount struc- 
tures; profit and loss accounts; pro- 
fitability charts; home finance control: 
shopping lists. The program will 
automatically calculate any changes 
in detail input and instantly correct 
affected totals, which means that 
constant updating is simple and fast. 
(RRP is £9.95), 

Scribe II is a professional word 
processor for the BBC Model B, fully 
compatible with all versions of the 
operating system and able to be 
used parallel or serial printer. The 
program is simple to use but very 
powertul, and handles up to 600 
lines of text (about two A4 sheets). 
The main features include menu 
drive; block insert/replace/delete; 80 
characters:per line display on 
screen; adjustable column width; 
save/load files to tape/disc; print as 
formatted or unformatted text; user- 
defined key operation for easy use. 
(RRP is £9.95 on tape; £14.95 on 
disc). 

For more information contact 
Alligata Software, 178 West Street, 
Shettield S1 4ET. 


SOFT WARES 


MICROWRITING FOR 
PETS 


Commodore PET users can now 
communicate with the Microwriter — 
the portable hand-held wordpro- 
cessor with a unique and extremely 
simple to use keyboard of just six 
keys. Microcomputer Services, an 
appointed Microwriting Centre, has 
developed the software program 
‘Speakeasy’, which allows two-way 
transfer of text between PETs and 
Microwriters. 

Now PET microcomputer users 
can transfer text to their data discs 
for storage, merging of files or for 
printing out at a convenient moment. 
Documents can also be retrieved 
from the PET and entered into the 
Microwriter's memory for reference, 
updating or amendment. The Mic- 
rowriter can also be used in a net- 
worked environment. An interface 
lead, enabling communciation bet- 
ween the PET, which has IEEE con- 
nectors, and the Microwrniter's in-built 
RS232 interface is available from 
Microcomputer Services. 

The ‘Speakeasy’ program is avail- 
able from Microcomputer Services, 
priced at £140. It will also be avail- 
able soon from other Microwriting 
centres around the UK. Details are 
available from Osman Ismail or 
Leslie Bird at MCS, telephone num- 
ber O1-802 0019, or 01-809 3896. 


DN PARC] =) =O) a! 
SPECTRUM 


Following on the launch of Magpie 
for the Commodore 64, Audiogenic 
have now announced Data Genie. 
Data Genie is an edsy-to-use data- 
base and record retrieval package 
that allows users of the Sinclair Spec- 
trum to organise their own records in 
their own unique manner and to 
recall them under a wide range or 
parameters. 

The package is controlled 
through the novel method of ‘pop-up’ 
menus which are managed by just 
three keys. The user selects the 
required option from each menu by 
raising or lowering a cursor line. 
Once the cursor is over the required 
option, a third: key automatically 
pulls in the menu relating to the 
option, overlaying the new menu on 
the previous menu. The user is thus 
able to follow clearly the steps taken 
in building up the database. As a 
menu element is selected, Data 
Genie automatically writes the rele- 
vent part of the program. 

Data Genie is supplied on cas- 
sette for the Sinclair 48K Spectrum at 
a cost of £9.95 and is available 
direct from Audiogenic or the nation- 
wide dealer network. Audiogenic are 
ae Box 88, Reading, Berks RG] 
2ON. 

















Make learning fun with these top quality educational games! 


Money - an intro- Missing Words - 
duction to coins and ee watch the train move 
notes and ther use forward when you | 
in shopping: § e type in the 
4-10 yrs. ieee seein ete Ie right word 
(Spectrum: 
48k.) 



































nneeer soe iceernennr rove 4-10 yrs 

Fas S~ SD yes: 
- wee nite Metis oo (Spectrum 
48k ) 





Maths 
invaders - 
answer the " 
questions correctly, 4 
or the invaders will hs 
land on you. 4-12yrs 
(Spectrum 16 48k. 
BBC B. Electron ) 


choose from 

a range of 
features and build 
up a face on the 


screen. 2-8 yrs 
(Spectrum 48k ) 
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yens tell thea thee? 


Time - learn to tell 
the time with this 
simple step by step.” 
guide. 3-10yrs 








(Spectrum 
48k BBC B ieveseiataseasee eseaann ose ; os 
Electron ) terval quenne for Wyma: | 
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Micros for * Raitroader - | 
Children 1. a set of “a lay track on — 
four educational games for a! the screen in : 
hildren of 3-8 yrs Excellent any layout you 
value (Spectrum 16 48k ) want 4-10 yrs 


(BBC B. Electron}. 


Spectrum programs only £6.95 BBC/Electron programs only £7.95 
Ask for.Stell Software at larger branches of Boots, John Menzies, W. H. Smith 
and all good computer shops, where most titles are available. 


Dealers should contact their regular distributors. 


Ne, the ehueeixon 


Stell Software 36 Limefield Ave, Whalley, Lancs, BB6 9RJ. 
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POKER 


Following the ZX81 version of Backgammon in the Sep- 
tember issue, we now offer you BBC Poker. Written for the 
32K BBC Micro with any operating system, this game will 
shuttle the deck, deal and bet with you, and all without 
the danger of losing your shirt. The only disadvantage is 
that you cannot read the expression on the computer's 
face to find out if it's bluffing! User-defined graphics allow 
your hand to be displayed on-screen as a set of cards, 
and if you do run into trouble the computer will even 
advance a loan of £1000. Bring the casino into your own 


- home with the March Computing Today. 


EASYCODE 


There are some difficulties attached to any series of 
articles that attempt to teach machine code. For a start, 
there's a different instruction set for each type of micro- 
processor. Then the type of microprocessor available 
depends on which computer you have: not all readers will 
have the same processor to hand. 

We've overcome the problems by inventing our own 
microprocessor! Easycode uses a simulated micro- 
processor with 100 ‘memory locations’ available, and 
using this model we can teach the general principles of 
machine code programming. The simulation will run on 


any home computer which supports BASIC and a TV 
display. 


ZX SPECTRUM PRINTER 
INTERFACE 


The Sinclair printer is nice and cheap, but the results are 
nasty and cheap-looking. It would be better to use a 
good-quality printer but there are a number of problems: 
the Spectrum has no Centronics interface and it puts out 
the wrong codes anyway. Next month we'll be publishing 
a combined hardware and software project to allow print- 
ing on a Centronics device: you can use either a simple 
DIY interface or the ready-built product from Kempston 
Electronics, and suitable software will be given for both 
types. 


Articles described here are in an advanced state of preparation 
but circumstances may dictate changes to the final contents. 


NEXT MONTH 
ne 


wht 


GENIE UTILITIES 


This short piece of software provides a wealth of extra 
facilities for the Genie owner. USR calls with multiple 
parameters, a VDU-type command for easy output of 
ASCII characters to the display, and conversions between 
various bases — it's all packed into only 334 bytes of 
machine code. Don't miss the March issue of Computing 


Today. 


SCOPE FOR IMPROVEMENT 


The Spectrum is capable of some very advanced 
graphics effects, as evidenced by the latest in commercial 
software for the machine. Unfortunately it’s been 
necessary to get your hands dirty with machine code if 
reasonably-paced arcade games are to be attempted. 
Until now, that is. SCOPE (Simple Compilation of Plain 
English) is a collection of just 31 commands that allow 
anyone to design a game and make it run at machine 
code speeds. We'll be reviewing this piece of software in 
the March issue. 
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mM Software News 


INNOVATIVE 
TRS 80-GENIE SOFTWARE 


from the professionals 


NEWS FLASH 


Molimerx and Logical Systems of Milwaukee, U.S.A., have joined forces to bring their 
customers a lower costing product and faster and more efficient service. 

From January 1984 all LDOS 5.1.x Logical Systems products, together with some of the 
LDOS (TRSDOS) 6. < products, will be available from Molimerx at the pound equivalent of the U.S. 
Dollar retail price. In other words, for the first time the considerable range of products of Logical 
Systems Incorporated will be available to the end user in the United Kingdom at the price at which 
the American customer can buy it in the U.S.A. All support for these products is being shifted to 
England, so that as from 1st January, U.K. customers can have the benefit of this important line, 
exactly as if it had been written and produced over here. 

Adjustments for the exchange rate will be made every six months or so. We are starting with 
the present exchange rate of 1.48. After VAT is added this scheme results in the price schedule 
(plus P&P) that follows: 








Name Brief Description Previous Present 
Selling Price Selling Price 
DISK/DISK Convert a disk file to another ‘‘disk drive’! fFn/a £ 76.94 
FED II 5.1 All purpose disk file editor £ 27.60 £ 27.60 
FILE MANAGER 5.1 Utility for mass manipulation of files £ 33.40 £ 30.30 
FILE MANAGER 6.0 Utility for mass manipulation of files £ 33.40 £ 30.30 
FILTER PACKAGE 1 Filters to enhance LDOS i a | £ 22.54 
FILTER PACKAGE © 2 Filters to enhance LDOS £ 22.71 £ 22.54 
FIX DISK A collection of patches for LDOS Shel & Ho = 7.76 
HELPS: 1 LDOS and LBASIC help eT? 25 £ 14.78 
HELP GENERATOR 5.1 Create your own HELP files E33, 39 £ 33.35 
HELP TEXT SOURCE Source files for creating main HELP files ESF A ae £ 14.78 
INVENTORY An aid to inventory tracking £ 82.50 £ 76.94 
1/0 MONITOR Disk |/O error intercept utility for LDOS £ 22.43 £ 14.78 
LDOS 5.1. x New generation disk operating system £105.80 £100.28 
LDOS TECH. HELP Technical help for LDOS £ 20.70 £ 20.70 
LED Screen orientated text editor £°27.85 £ 21.85 
MAIL/FILE II A mailing list database manager £ 82.50 £ 76.94 
MEMDISK Additional disk type storage £ 28.69 £ 22.54 
QUIZ MASTER Questions and Answers — Master includes general £ 33.40 £ 30.30 
QM GEOGRAPHY Questions and Answers — Geography Requires Quiz Master £47.25 £ 14.78 
QM MATH Questions and Answers — Maths Requires Quiz Master R125 £ 14.78 
Smal-LDOS Miniature of the original LDOS £43.70 £ 43.70 
TaBiA: $27 Basic text processing utility e547 5 S Su.75 
T.B.A. 6.0 Basic text processing utility £57.50 £ 57.50 
ULTRA TREK Space Wargame En/a £ 11.87 
UTILITY DISK | LDOS enhancement package £ 33.46 £ 30.30 





TEL: [0424] 220391 / 223636 MOLI M ERX- ITD TELEX 86736 SOTEX G 


A J HARDING (MOLIMERX) 
1 BUCKHURST ROAD, TOWN HALL SQUARE, BEXHILL-ON-SEA, EAST SUSSEX. 
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Software: Graphics routines 


James |. Bartholomew 








USING EPSON 
MX-80 GRAPHICS 








The Epson M -printer is a popular and versatile 
beast which is capable of a great deal more than 
just listing your programs. In this article we show 
you how to make the most of graphics. 








hen I originally decided to 

buy a printer it was to help 

me in the development of 
programs, to print out results and to 
use in writing reports and letters. | 
chose the Epson MX-80 because it 
was a good, clear typeface and also 
because it had a dot graphics 
capability which I thought would 
compensate for the lack of high 
resolution graphics on my TRS-80. 

When you look at advertising 

brochures and reviews of printers 
they usually illustrate the graphics 
capability by contour maps of some 
mathematical function and pictures 
of pretty ladies made up from 
individual dots. There is very little 
information, however, either in books 
or magazines on how to produce 


these pictures for yourself at home. A — 


digital converter would be required 
to change a photograph into data for 
a computer, but mathematical func- 
tions can be graphed quite easily. 
A favorite function of mine is 
Z= 10% SIN(X)/X, which crops up fre- 
quently in science and engineering 
and has a pleasant appearance. If 
you wanted to plot this on the VDU 
you would use a program such as 
Listing | which takes each value of 
-X, calculates the corresponding 
‘value of Z, scales the coordinates - 
and displays the point on the screen. 
This direct approach cannot be 
used with the MX-80 as it makes use 
of the random access characteristic 
of the VDU; each point can be SET 
or RESET in any order. With a printer 
















PRINT HEAD 





O00000 000 


DOT WIRE 
NOT USED 


B 
GRAPHICS 





Fig. 1 The association between the 
data bits and dot wires. 


you must start at the top and work 
down. Once it has advanced to print 
a lower point, it cannot go back up 
again. 

It is necessary, therefore, to 
calculate each point first, store the 
results and finally print them. Before 
we do this, let's remind ourselves of 
how the MX-80 prints dot graphics. 


EPSON GRAPHICS 
MODE 


To enter the normal density bit image 
mode, the computer must send an 
ESC K instruction to the printer. ESC 
is CHR$(27) and K is CHR$(75), sent 
to the printer as two consecutive 
bytes, one of 27 and the next of 75. 
The next two bytes (nl and n2) 
sent to the MX-80 tell it how many 
bytes (n) of bit image data follow; up 


USING EPSON MX-80 GRAPHICS 


to a maximum of 480, the total num- 
ber of dot positions in a line. These 
are in order (least significant byte), 
(most significant byte) and the total 
number of graphics bytes is given by 


n= nl + 256*n2 


For example, if you want to print 
110 bytes of bit image data then 
nl=110 and n2=0, or to send 310 
bytes then nl=54 and n2=1. 

Once ESC K nl n2 has been 
sent to the printer, the next n bytes 
will be interpreted as image data 
and not as characters or printer 
controls. 

Double density graphics are con- 
trolled in the same manner by send- 
ing ESC L (27 then 76) to the printer, 
and nl+256%n2 can total up to 960 
because dot spacing is halved and 
there are twice as many in a line. 

The print head of the MX-80 con- 
tains nine wires one above the other, 
each capable of printing a single 
dot. All characters are made up of 
combinations of these dots. When 
you enter bit image mode, only the 
upper eight wires are active, and 
each bit of a graphics byte controls 
one wire as shown in Fig. |. 

The most significant bit controls 
the top wire and the least significant 
bit the bottom. So, a byte of 255 will 
fire all eight wires to prir.t eight dots, 
15 will print the lower four dots and O 
will print none. 


PLOTTING THE 
FUNCTIONS 


Let us now look at two methods of 
plotting the function Z= 10% SIN(X)/ 
X. First of all, we can store all the 
values of Z in an array and then 
calculate which should be printed on 
each row. Or, secondly, we can plot 
each point into a buffer and then 
dump the buffer out to the printer. 

In the first method, for the range 
of values of X that we want to use we 
calculate each value of Z and store it 
in an array Z(X). Then we scan the 
array for each value of Z, starting at 
the highest, and print a dot at the 
appropriate X position. This is done 
by Listing 2 and the result is shown in 
Fig. 2. 

If we decide to calculate for 
values of X between —15 and 15 in 

















99 REM ** Clear the screen ** 
100-.GES. 

109 REM ** Calculate function ** 
110 FOR X=-15 TO 15 STEP .25 


120 IF X=O THEN Z=10: GOTO 140 

120 Z=10O¥SIN(X) /X 

139 REM ** Scale coordinates for display ** 
140 XD=4#X+64 

150 ZD=36—-3¥%Z 

1359 REM ** Display point ** 

160 SET (XD, ZD) 


170° NEXT x 
179 REM ** Freserve display ** 
i180 GOTO 180 






Listing 1. Program to display 
Z= 10% SIN(X)/X on the VDU. 
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Fig. 2 Atwo-dimensional function, 
Z= 10% SIN(X)/X. 





steps of O.1 there will be 301 values 
ot Z, so we dimension the array. The 
upper limit of 15.05 in the FOR state- 
ment is to compensate for inac- 
curacies in the single precision 
maths of the TRS-80. If it starts at 
—15 and adds 0.1 for 300 times, 
instead of reaching 15, it gives just 
over 15 and the loop would finish 
without calculating that point unless 
we make the upper limit just over 15. 

Line 200 uses ESC A 8 to set the 
paper advance at a linefeed to 8/ 
‘72nds inch. As each dot is 1/72nd 
inch apart this means there will be 
no spaces between lines. The verti- 
cal spacing of dots will be even. 

The value of Z will lie between 10 
and —3, and for each value we start 
a new line, set a tab to centre the 
picture and set the graphics mode. 

If the value of Z(N) is less than V 
then we don't want to plot it yet, soA 
is set to zero. If Z(N) is not less than V 
then we have a point that we wish to 
plot and we must calculate which of 
the eight dot wires to fire. 

As we only wish to plot a single 
dot, the value to send to the printer 
will be 1, 2, 4, 8, 16, 32, 64 and 128, 
which are all powers of 2 ie 2°,2!,... 
. 2’. If we subtract the integer part of 
Z(N) from Z(N) we are left with the 
remainder RZ, which will be a posi- 
tive number less than |. This is mul- 
tiplied by 8 and the integer taken to 
give a whole number between 0 and 
7 proportional to RZ. This is the 
exponent EX of 2 we need to print 
the correct dot. Z(N) is made equal to 


99 REM ** Dimension array ** 

190 DIM Z(301) 

109 REM **® Calculate function ** 
LIOLE OR K==1Ss Oo 1o.0S STEP x62 

120 N=INT (X#¥10>4151 

120 IF X=O THEN Z(N)=10: GOTO 150 
140 Z(N) =LO#SIN(X) /X 

150 NEXT X 

199 REM ** Set line spacing ** 

200 LPRINT CHR (27) 5; CHR (65) s CHR (8) 
AAO POR Veter) = See. 1 


—100 so it will play no further part. 

A peculiarity of the TRS-80 is that 
it will not LPRINT CHR$(0), (10), (11) 
or (12); if any of these values might 
be used we have to POKE the value 
to the printer which is located at 
memory byte 14312. The MX-80 puts 
a 63 on address 14312 when it is 
ready to accept data which explains 
line 300. If your computer can 
LPRINT any number then replace 
lines 300 and 310 with: 


308 LPRINT CHRS (A) 


You can experiment by substitut- 
ing your own equations in line 140, 
using an error trap in line 130 if 
required. You should have a good 
idea of the upper and lower limits on 
the value of Z(N) so you can set the 
loop in line 210. 

Altematively you can have the 


program detect these for you by add- 


ing the lines: 


185 ZL=50000: ZH=-ZL 

143 IF Z(N)<ZL THEN ZL=Z(N) 

146 IF Z(N)>ZH THEN ZH=Z(N) 

210 FOR V=INT (ZH) TO INT (ZL) 
Sree is 


Good equations to try are 


Z (N) 
Z (N) 


BUFFERED PRINTING 


The second method we will look at is 
analogous to printing on a memory- 
mapped VDU screen. We select a 
block of memory as a butter in which 
we will plot all the points to be prin- 
ted and then dump the buffer out to 
the printer. 

For example, if we wish to plot 
Z= 10% SIN(X)/X as betore with X 
varying from —15 to +15 in steps of 
O.1 and Z between —3 and +10, 
then we need a butfer 301 bytes 
wide and 14 bytes high: see Fig. 3. 
So a continuous block of 4212 bytes 
must be selected and protected. For 


a TRS-80 with 16K RAM, plenty of 


3*SIN(X) + 3*COS (2*X) 
1/2*(X/4)°3 - X 


110 FOR B=SE TO EB 
120 POKE B,O 
120 NEXT B 


160 Z=1O*#SIN(X) /X 


179 XD=INT (10%*X) 
ZD=INT (2) 





301 BYTES 


14 BYTES 


(_] 0c = sB + 3160 


EB = SB +4213[_] 


Fig. 3 The print buffer for a two- 
dimensional function. 


memory can be protected by 
answering the MEM SIZE? question 
at switch on with 20000. Whatever 
your system, choose a suitable value 
for the start byte SB. : 

SB represents X—15 and Z= 10, 
so the point for X=O, Z=O is SB+150 
(to make X zero) +3010 (to make Z 
zero. Thus the origin is 
OG=5B+3160. The end byte EB is 
SB ez ts: 

Listing 3 shows the program for 
plotting the function. Notice the 
similarities in structure between this 
program and Listing 1, where the 
function was plotted on the VDU. 

The butter area must first be 
cleared to avoid printing random 
points, then each point is calculated 
and plotted in the butter. As before, 
the appropriate bit is derived by rais- 
ing 2 to an exponent formed trom the 
remainder of Z. | 

When plotting the point, the 
integer part of Z is multiplied by 301, 
the number of bytes in a line, in order 
to plot the point in the correct line. 
Because the top line to be printed is 
from the lowest memory addresses in 
the butter, Z is subtracted from the 
origin rather than added. 

When dumping the buffer, C is 
used to count the number of bytes 
printed in a line and when it reaches 
301 a linefeed is sent, followed by 
data to set up the bit image mode for 


99 REM ** Select buffer address ** 
100 SB=20000: OG=SB+3160: EBR=SB+4213 
109 REM ** Clear the buffer *«* 


“ 129 REM ** Calculate function *e 
140 FOR X=-15 TG -1S.08 STEP. 
150 IF X=0 THEN Z=10: GOTO 170 | 


169 REM ** Scale coordinates for plotting ** 


RZ=Z-ZD: EX=INT(8*#RZ): A=2CEX 





ee REM ** Frepare graphics mode ** 
220 LFRINT TAB(15) s;CHR$ (27) 5 CHR$ (75) § CHRS (45) sCHRS(1)5 
230 FOR N=1 TO 301 
IF Z(N)<V THEN A=O: GOTO 200 
RZ=Z (N)—-INT (ZN) ) 
EX=INT (8#RZ) 
A=2CEX 
Z(N) =-100 
REM. 4% Print “point “es 
IF PEEK (14312)<¢563 THEN 300 
POKE 14312,A 
NEXT N 
Sa LFRINT 
240 NEXT V 
349 REM ** Reset printer ** 
350 LPRINT CHR (27) 5 CHR (64) 


REM ** Flot point +*«* 
POKE OG+XD-301*ZD,A 
NEXT X 
REM ** Set line spacing ** 
220 LFRINT CHR (27) sCHR# (465) s CHR (8) 
29 REM ** Set counter ** 
230 C=301 
2 FOR B=SR TO ERB 
IF Os +5012 THEN, 270 
LPRINT CHR (13) 5s TAB(1S) sCHR$ (27) 5 CHRS (75) sCHRS (45) sCHRS(1)5: C=0 
REM ** Frint point ** 
IF PEER (142312)<>63 THEN 270 
FOKE: 14312, PEEK (B) ; 
$7 £9 C=C+1 : 
300 NEXT &B 
209 REM ** Reset printer ** 
210 LFRINT CHR (27) ; CHR (64) 


Listing 2. Progam to store a function 


Listing 3. Program to store a function 
in an array before printing. : 


in a buffer before printing. 
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99 REM ** Select buffer address ** 
100 SH=20000: OG=SB+46308: ER=SB+12616 
109 REM ** Clear the buffer ** 

110 FOR B=SB TO EB: POKE B,O: NEXT B 
119 REM ** Calculate the function ** 


99 REM ** Select buffer address ** 
100 SB=20000: OG=SB+6308: EB=SH+12616 
109 REM ** Clear the buffer ** 

110 FOR B=SE TO EBs)-POKE ByOr NEXT & 
119 REM ** Calculate the function ** 














130° FOR VelS TOL eto Sree ct ' 120 C=10 

140 PRINT Y 130 BOR Y=12)-TO7-122.03.5TER =. 1 

1460 FOR X2=23)070).15..05 STEP. 1 140 IF C=10 THEN S=.1: C=O: FRINT Y: GOTO 160 
is ange R=SQR (Y*Y+X#X) 150 S=1 

180 IF R=O THEN Z=10: GOTO 210 160 FOR X=-12 TO 12.05 STEP S 

190 Z=1O*#SIN(R) /R 170 R=SOR (Y#Y+X#X) 

199°: REM ** Scale coordinates for plotting ** 180 IF R=O THEN Z=10: GOTO 200 

210 ZD=Y+Z: IZ=INT(ZD) 190 Z=10*¥SIN(R)/R 

220 RZ=ZD-IZ: EX=INT(8*RZ): A=2LEX Lee REM ** Scale coordinates for plotting ** 
230 XD=INT(10#X):s YD=-341#1Z 200 X1=(Xt+Y)%. 7071: YI=(Y-X)*. 7071 

240 B=0G+XD+YD 210 ZD=Yi+Z: IZ=INT(ZD) 

249 REM ** Check point is in bounds ** 220 RZ=ZD-IZ: EX=INT(8*RZ): A=2CEX 

250 IF BOEB THEN GOTO 310 220 XD=INT(10#X1):s YD=—-341*IZ 

260 IF B«<SB THEN BR=0G+XD-6138: A=0 240 B=0G6+XD+YD 

269 REM ** Erase hidden lines ** 249 REM ** Check point is in bounds ** 
270 FOR M=OG+XD+6138 TO Bt341 STEF -—TZ41 250 IF B>ER THEN GOTO 310 

280 POKE M,Q 260 IF BX<SB THEN B=0G+XD-6138: A=0 

290 NEXT M 269 REM ** Erase hidden lines ** 

299 REM ** Flot point ** 270 FOR M=O0G+XD+6138 TO B+341 STEP —-241 
300 POKE &, (PEEK (BR) OR A) AND (2546-A) 280 POKE M,0O 

310 NEXT X 290 NEXT M 

S30“ NEXT: Y ae REM ** Plot point ** 
399 REM ** Set line spacing and counter ** 300 POKE B, (FEEK(R) OR A) AND (256-A) 
400 LPRINT CHR# (27) 3 CHR (65) SCHR (8): C=341 310 NEXT. X 

409 REM #* Print out buffer ** 320 C=C+1 

410 FOR B=SH TO ER 330 NEXT Y 


420 IF C<>341 THEN 440 


430 LPRINT CHR$(13) 5 TAB(11) §CHRS (27) §CHRS (75) SCHRS (85) sCHR#(1)5: C=O 


439 REM ** Print point ** 

440 IF PEEK (14312) 2263 THEN 440 
450 POKE 14312, PEEK (B) 

460 C=C+1 ; 

470 NEXT B 

479 REM ** Reset printer ** 

480 LPRINT CHR (27) 5 CHRS (64) 


Listing 4. Program to print a three- 
dimensional function. 





the next line: C is then reset to zero. 
Itis set to 301 initially in order to print 
the first line. 

If we compare the two methods 
we see that the first calculates the 
values of Z quite quickly, although it 
is a bit slow at plotting the function. 
The second method uses more 
memory which has to be protected, 
takes time to clear the butfer and 
calculate each point, but is faster at 
printing out. Both ways are compar- 
able, but the second method of plot- 
ting points in a butter before dump- 
ing it to the printer is more versatile, 
as we shall see when we try to plot 
three-dimensional functions. 


3D FUNCTIONS 


Let's look at the plotting of 3- 
dimensional functions. In these cases 
we will plot Z as a function of X and 
Y, or maybe R where R is the dis- 
tance from the origin. We will plot 
values of Y above each other to 
generate the impression of depth. 

We will require a larger butter for 
these functions, so we will set one 
which will be used for the remainder 
of the article. The buffer will be 341 
bytes wide by 37 bytes deep, and on 
my system occupies memory loca- 
tions 20000 to 32616: see Fig. 4. 

When we come to use oblique 
views, this window will allow plotting 
of functions with X and Y both vary- 
ing from —12 to +12. Once again, 
select a suitable value of SB for your 
system. 

The simplest way to proceed is to 
select successive values of Y starting 
in the background and working 
towards the foreground. For each 
value Y, a line is plotted by calculat- 
ing the function Z. Each point is plot- 
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410 FOR B=SB TO ER 


ted in the buffer as it is calculated. 
By starting at the back we can 
cater for the case of hidden lines, ie 
lines which will be covered by plot 
ting the function nearer the front. This 
is done by calculating where a point 
is to be plotted and erasing any pre- 
viously plotted points which lie 
below it. : 

We are now working in three 
dimensions so Z can be a function of 
X and Y or, ifit is circularly symmetri- 
cal, a function of R, the distance from 
the origin. In this case, using 
Pythagoras’s theorem, 
R=SOR(X¥%® X+Y % Y). 

As an advance from the function 
we plotted in two dimensions, let's 
look at plotting Z=10% SIN(R)/R. The 
program to do this is in Listing 4 and 
the result in Fig. 5. 

First the buffer is defined and 
then cleared. Following this are a 
pair of nested loops to calculate all 
the points for each value of Y and X. 
There are 3] values of Y from —15 to 










341 BYTES 
= 


[_] 0G = SB + 6308 


37 BYTES 








EB = SB + 12616] | 






Fig. 4 The print buffer for three- 
dimensional functions. 


399 REM ** Set line spacing and counter ** 
400 LPRINT CHR (27) 3 CHR (65) sCHR#(8): C=S41 
409 REM ** Frint out buffer ** 


420 IF Ce>341 THEN 440 


430 LPRINT CHR# (13) § TAR(11) s CHR (27) s CHR® (75) §CHRS (85) SCHRS(1)52 C=O 
439 REM ** Print point ** 

440 IF PEEK (14312)<263 THEN 440 

450 FOKE 14312, PEEK (B) 

460 C=C+1 

470 NEXT & 


479 REM ** Reset printer ** 
480 LPRINT CHRS (27) ; CHR (64) 


Listing 5. Program to print an oblique 
view of a three-dimensional function. 

























15 and 301 values of X by going in 
steps of O.1. So in total there are 

9331 points to plot. This takes about 
an hour to complete, so to keep track 
of progress and to satisfy yourself the 
computer hasn't hung up the PRINT Y 
statement at line 140 is included. 





Fig. 5A three-dimensional function, 
Z= 10% SIN(R)/R. 


This is probably a good place to 
point out that the listings in this 
article have been written for ease of 
understanding and to indicate the 
structure of the program. Significant 
savings can be made if spaces and 
remarks are deleted, multi-statement 
lines are used and series of calcula- 
tions are combined, especially within 
the inner loop. 

As an example, line 170 calcu- 
lates Y¥% Y 301 times for each value 
of Y. If this is calculated once as 
Y2=Y%*Y in line 140 then 
R=SOR(Y2+X* X) can be used in 
line 170. Another saving could be to 
convert line 220 to 





A=2A(INT(8%(ZD—12))). > 


In a manner similar to the two- 


} 
| 
| 
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dimensional case, the value of Z is 
calculated, the point to plot is 
derived and stored in A and the byte 
in which the point is located is 
calculated by adding an X and Y 
displacement to the origin. This takes 
place in lines 1'70 to 240. 

Lines 250 and 260 then check if 
the byte is within the bounds of the 
butter. If it is after the end byte EB the 
point is ignored. If it is before SB then 
the point is not plotted but it will be 
in front of any points already plotted 


below it in the buffer. In this case the Z= 10% SIN(R)/R. 


byte is converted to the top row of Remembering that A is a power of 
the butter to enable hidden line two, a little experimenting will show 
removal and A is reset to O so no that (256 — A) represents a binary 
point will be plotted. number with all bits above and 
Hidden lines will be erased by including A set, and all below A 


the routine in lines 270 to 290. As we reset. 
plot the function trom the back for- 


ward, any previously plotted point oo ae a sd diaialltce ieee 
will be behind the point currently i Oe eee Oe ee 
being plotted. If it is also below the (256 — A) represents a mask which 


Ww 
current point then it is ‘hidden’ and passes the bits we want and blocks 
must be erased. The routine starts at —_— the others. : 

the bottom of the buffer and resets to : 

zero all bytes directly below the byte (PEEK(B) OR A) AND (256 - A) = 
in which the point is to be plotted. 16601086 8 8 


Once all the points have been 
plotted, the buffer is dumped to the 
printer as in the two-dimensional 
case, except that there are now 341 
bytes per line. | 





Z=15*EXP (-R*R/SO) +B#EXP (—. 125% (R-10) “2) -4 


X1 = X*COS(Q) + Y*SIN(Q) 
Y1= Y*COS(Q) — X*SIN(Q) 





Fig. 6 Relationships for the rotation 


[of axes. 


' There is still a problem of hidden 
points within the byte as each bit 
represents a separately plottable 
point. More significant bits than the 
one in which the point is plotted are 
not hidden and most be retained, 
but the less significant bits must be 
erased. The logical expression in line 
300 accomplishes this. 

A is a power of 2 and represents 
one bit. If ORed with PEEK(B) it is 
equivalent to setting that bit. 
(PEEK(B) OR A) therefore represents 
the contents of B with the bit set that 
we are interested in. For example, if 
B has two bits set, say the LSB and 
MSB, and A = 16, then: 3 

PEEK(B) =106880860961 
A=868B1G6809 
ee hee Git ar Jean a ee ae” a 





(PEEK(B) OR A Fig. 8 Some other functions. 


Fig. 7 An oblique view of the function 





4) 
Y) 
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OBLIQUE VIEWS 
Sometimes it is of value to view a 
contour obliquely and plot the lines 
parallel to the X and Y axes. This 
can be readily achieved with small 
changes to our program. 

First of all, consider how to repre- 
sent a point viewed obliquely. Sup- 
pose we have a point (X,Y) that we 
wish to view from an angle © (see 
Fig. 6). The new coordinates (X1,Y1) 
are calculated by: 


Take in CRA 8 


For the special case of 45°: 


COS (Q) = SIN(Q) = 8.7071 
RLS ON + FR ese 
YL SAY XK) Re. Tere: 


To produce Fig. 7 this change is 
included in Listing 5 at line 200, 
along with other changes and addi- 
tions. First of all, X and Y are limited 
to between +12 and —12 giving a 
maximum value for X1 of: 


(12. 13) 00. 7071 @ 16.97 


The minimum value is — 16.97 and 
the same holds tor Y1. This uses the 
whole width and height of the butffer. 

For all integer values of Y the 
value of X is incremented in steps of 
0.1, which effectively plots a con- 
tinuous line parallel to the Y axis. At 
all other Y values, X is incremented 
by 1 to build up the lines parallel to 
the X axis. The value of the step is 
calculated in lines 140 and 150. C is 
introduced as a counter to determine 
when the step of O.1] is required and 
is initially set to 10. 

With these changes made, the 
program calculates the function and 
plots it using X1 and Y1. Plotting the 
points into the butter and dumping 
the buffer to the printer are accom- 
plished in the same way as in the 
previous listing. 


FURTHER 
DEVELOPMENTS 


Considering the time it takes the pro- 
grams in this article to run, it would 
be a wise move to write machine 
language routines to clear the buffer 
and dump the buffer to the printer. 
However, by far the longest time is 
taken in calculating all the points 
and plotting them in the buffer. A 
routine to save the butter to tape or 
disc could save a lot of time in future 
if it was necessary to print out a func- 
tion again. 

With a little adaptation these 
routines could be used to plot 
functions on the video display if your 
computer has a high resolution 
graphics capability. This would give 
the enjoyment of being able to watch 
the picture being built up rather than 
just imagining it. 
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Review: Books and software for machine code 





Don Thomasson 





SPECTRUM | 
MACHINE CODE 


With a hefty piece of machine code to write on 
the Spectrum, our reviewer looked around for 
some tools to help him out. This is what he found. 





acing the task of writing a fairly 
im large machine code program 

for the Spectrum, I began to 
cast round for the information and 
software tools which | would need. 
The results may be of interest to 
others who are making similar 
investigations. 

Where information on the con- 
tents of the Spectrum ROM is con- 
cermed, the obvious authoritarian 
source is The Complete Spectrum 
ROM Disassembly (Logan & 
O'Hara, Melbourne House). This 
gives all the interpreter and operat- 
ing system details, with terse com- 
ments, and all the information one 
could possibly need is there — 
somewhere. 

Being naturally lazy, not to say 
slightly pressed for time, | hoped to 
be able to supplement this data with 
some more direct information on how 
the ROM routines could be 
accessed. A set of three books from 
Interface was suggested, but these 
proved a disappointment. 

Perhaps I should mention at this 
point that I have been working in Z80 
machine code quite happily for some 
three years now, having graduated 
through a number of other processors 
before that. What 1 wanted was data 
relating to the Spectrum. For informa- 
tion on the Z80, it would be difficult 
to improve on Programming the 
Z80 (Rodnay Zaks, Syber), which has 
long been our standard reference on 
the subject. 

The three Interface books were 
aimed at comparative beginners, 
even though one had the subtitle ‘For 
Advanced Programmers’. Starting 
with explanations of binary and 
hexadecimal notation, they moved 
quite briskly forward, but were 
primarily concemed with machine 
code as a support to BASIC pro- 
grams, whereas I needed information 
on the use of ROM routines to sup- 
port machine code. 

There were also some rather fun- 
damental errors. In the volume sub- 
titled ‘For Beginners’, it was said 
that addition could only be per- 
formed in the A register, a lengthy 
explanation being given of a way to 
perform HL = HL + DE via the A 
register. The instruction ADD HL, DE 


would have been more appropriate. 
It was also stated that the carry flag 
could not be transferred to the A 
register, which is nonsense. 

These may seem to be very minor 
points, but such mis-statements have 
a way of spreading themselves. It 
seemed most unfortunate, to put it 
mildly, that beginners should be 
misled in this way. 

It was also a pity that some of the 
listings were printed as tacsimiles of 
rather tatty ZX Printer output. Now 
that there are several systems for 
driving respectable printers from the 
Spectrum this is unnecessary. One 
long listing in the largest of the three 
books was based on the output of a 
printer which with a very limited 
character matrix, and that was very 
difficult to read. However, most of the 
rest of the book used typeset listings 
that were very clear. 

The first two books were both 
tiled Spectrum Machine Code 
Made Easy, Volume | ames 
Walsh) being subtitled ‘For Begin- 
ners, and Volume 2 (Paul Holmes) 
being subtitled ‘For Advanced Pro- 
grammers. Both authors are 
teenagers, and while their text 
showed considerable maturity the 
content perhaps reflected their 
limited experience. 

The third book, titled Mastering 
Code on your ZX Spectrum (Toni 


Baker), was much more comprehen- 
sive, giving some quite substantial 
programs as illustrations. 

These three books were 
examined in detail, but several more 
were examined before it became 
obvious that there was a distinct gap 
in coverage, with nothing to provide 
the data needed by the relatively 
serious programmer. This is rather 
typical of the personal computer 
scene. There is plenty of help for 
novices, up to a point, but thereafter 
they are left to their own devices. But 
for that, many more would be able to 
continue their development to higher 
levels. 

The next need was for software 
tools. For programs up to around 600 
bytes, I will happily code by hand, 
but with 6000 bytes and a large 
database in prospect an assembler 
was obviously desirable. 

The first specimen, the Zeus 
Assembler from Crystal, failed to 
please. It gave a display in normal 
Spectrum lettering, lower case, in 
black on white, and there was little in 
the way of formatting to make the 
result readable. For example, labels 
tended to get buried in a confused 
mass of text, where they should have 
been in a column on their own. 

The second offering brought 
relief. The Picturesque Editor/ 
Assembler was in a different class: 
the display was a pleasant white on 
blue, with 40 columns neatly divided 
into appropriate fields. Capital 
letters of very readable torm were the 
norm, though lower case became 
available for text between quotes, 
used for comments and messages, 
The Editor provided auto-numbering 
and renumber, making insertions as 
easy as in BASIC, and the simple 
command set provided all the 
functions needed. 

There was the slight snag that the 
cursor had to be moved to the lett- 
hand column before any command 
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was recognised, but that soon 
became a matter of habit. There was 
also the fact that the all code was 
assembled in the Object Buffer, start- 
ing 256 bytes above STKEND, 
whatever the stated origin for the 
code might be. It was then necessary 
to save the Object Buffer to tape, 
producing a result that could be 
loaded into the correct position by 
the usual LOAD” CODE command. 

Nevertheless, it was possible to 
test code betore saving it by specify- 
ing ORG#, which put the origin at 
the start of the Object Buffer. Once 
the code was proved, it could be re- 
assembled with the proper origin, 
and saved to tape. 

Verity was intelligent enough to 
know what kind of recording was 
involved, either source text or object 
code, and it was possible to retain 
the contents of the Lable Table while 
loading fresh source code. 

In short, the system was a near- 
professional standard in concept, 
and thoroughly professional in 
execution, which is more than could 
be said of some of its competitors. 

The program also has the benefit 
of a good backup service. A mild 
query brought a full page letter of 
explanation, together with a copy of 
the most recent issue of the tape. In 
response to a question about driving 
more respectable printers, the letter 







also enclosed a listing for a driver to 

match the Kempston interface, and 

that was the clincher, since it would 

allow the programs produced to be 

properly documented on an Epson 
X80. 


As a companion to the Assem- 
bler, Picturesque produce a Monitor, 
both programs being supplied in 16K 
and 48K form. It is therefore possible 
to load both at the same time, which 
can save a lot of fiddling about, at 
the expense of a reduction in work- 
ing space. 

The Assembler is so quick, 
especially with no display or printout, 
that there was little excuse for patch- 
ing code directly, but the Monitor 
had a number of other uses. It would 
move code bodily trom one area to 
another, or fill an area of RAM with a 
given byte value. It would insert or 
delete code, moving higher code 
appropriately. It would jump to a 
specitied start point. It would set, 
implement, and clear breakpoints, 
display register contents and alter 
them, generate a hex dump, or enter 
text into memory. There was also a 
conversion routine between hex and 
decimal. The MX80 printer driver will 
work with the Monitor, too. 

Equipped with these two | 
Picturesque programs, I feel able to 
approach the task ahead with 
greater contidence. When such satis- 
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factory offerings are available, it 
seems a pity that many users, buying 
blind by post, may well think that less 
professional programs are the best 
available. Being a cynic, | sometimes 
suspect that products that are adver- 
tised strenuously are less satisfactory 
than those which are not advertised 
at all. Getting in touch with 
Picturesque was a little difficult, 
because they advertise very little... 


The Complete Spectrum ROM 
Disassembly, Dr. lan Logan and Dr. 
Frank O'Hara, Melboume House, 
£9.95. 

Programming the Z80, Rodnay 
Zaks, Sybex, £9.95 from The Com- 
puter Bookshop, 30 Lincoln Road, 
Olton, Birmingham B27 6PA. - 
Spectrum Machine Code Made 
Easy Vol 1, James Walsh, Interface, 
£505. 

Spectrum Machine Code Made 
Easy Vol 2, Paul Holmes, Interface, 
£5.95. 

Mastering Machine Code for 
your Spectrum, Toni Baker, 
Interface, £9.95. 

Spectrum Editor/Assembler, 
£8.90 including VAT and postage. 
Spectrum Monitor, £7.50 including 
VAT and postage. 

Both the above trom Picturesque, 6 
Corkscrew Hill, West Wickham, Kent 
BR4 OBB. : 7 





CHRISTMAS OFFER 
Brother HR-15 Printer 
) £399.00 








17 Chrs per second. Perfect daisywheel 
print. Ideal for home and business use. 


wes GROW W Business CENTRE 


56 - 58 SOUTH STREET, EASTBOURNE, 
EAST SUSSEX. (0323) 639983/20496 
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CHRISTMAS PRESENT 
Printer for you... 
... lypewriter for wife 
SPECIAL PRICE £399 + VAT 


Apple, virtually any computer. 

BROTHER CE-50 DAISYWHEEL TYPEWRITER 
Perfect print quality. Lift off correction. 
Coloured carbon ribbons - 10 million chrs - 


PRINTER 


Carriage paid 


extra daisywheel - 18 type styles. 


13 Chrs per sec— ASC II wheel available— medium 
duty use — parallel or serial. Full K.S.R.—only £30.00 
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Not all home computers 
stay at home. — 


The BBC Micro is the ideal family com- such as David Beck, pictured below with 
puter—simple to operate, yet fast, powerful, his class, is “N ewsagent:” 
with enormous potential. This program contains all the 

But its nice to know, necessary information for the class 
when you buy one for your », toruna newsagents shop; allow- 
home, that the business, § ing them to organise daily 
educational and scientific deliveries, make up billsand 
worlds agree with your keep an eye on stock 
























choice. control and ordering. 
Here are a few stories oN It's anice example 
to illustrate how the BBC . of how the BBC 
Micro gets out and about. Micro can be used 
And one to remind you how not only to acquaint 
helpfulit can be when itstays a class with the language — 
at home. of computers, but also 
A practical lesson in with some of the real- 
~ business admin. ities of the community 
The contribution of the BBC in which they live. 
Micro in the classroom has long Correcting 
been recognised at Perins Community Jodrell Bank. 
School in Hampshire. ‘The BBC Micro is a 
The School has 12 BBC Micros used _ familiar worker around 
extensively across the syllabus: in fact Jodrell Bank. 
some pupils are using them to study for Youll find it in the reception area ex- 
their GCE O Levels in computing. plaining the workings of a radio telescope 
One of the programs available = to visitors, for example. 


to Perins teachers But its also been helping ina 
more testing task: to improve the per- _ 
, formance of the Defford telescope. 
\ In this application it has 
been used to make calculations 
necessary to determine the 
‘precise parabolic shape of 
the dish. | 
Theodolites are used | 
to do the measuring-then 


the BBC Micro works out the 


necessary corrections. 








‘The end of the scrawl. 
[If any of you have noticed how much 
easier it is to read and understand labels 
on drugs and medicines these days, then 


you can most probably thank the BBC 












acist, was first to realise how a micro with 
a suitable printer could produce labels 
that were accurate and legible and 
which could include, automatically, 
such information as drug reaction 
warnings. 

At the same time it 
could record drug usage for 
better stock control. 

He chose the BBC 
Micro for its versatility and 
potential for expansion. 

John Richardson be- 
lieves that this system will 

— «be recognised as standard 
in the profession and be used in hospitals, 
health centres and pharmacies through- 





out the UK. 
Meanwhile back at home. 
Dr. & Mrs. Yarwood bought a BBC 
Micro as a birthday present for their 12 
year old daughter. 


TJ ildadae 
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However, it quite quic K y became | 
common property. 


All three can now write their own 





Micro. John Richardson, a Preston pharm- 














es ———— 
> <a 


programs. Mrs. Yarwood is particularly 
proud of one program she has compiled to 
help teach her daughter French 
vocabulary. 

They all agree that although the Micro 
is fast and powerful enough to be at home 
in Jodrell Bank, gggp ee " 
itisalsothe 4 . ‘ 
ideal com- 
puter at the 
Yarwood 
home: 
simple to set 
up (virtually © 
any I'V set 
and cassette | 
player is all 
you need) 
and simple 
to use. 
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All this for only £399. 

‘The BBC Micro comes with a com- 
prehensive, step-by-step User Guide 
which introduces you to your micro and 
shows you how to construct useful pro- 
erams of your own. 

You will also receive a free““Welcome” 
cassette which contains 15 different 

programs for you to experiment 
with, ranging from music and 
eraphics to games like Kingdom 
and Bat’n’ Ball. 

‘The BBC Micro is available 
from W H Smith Computer 
Shops, Boots, John Lewis and 

local Acorn stockists. _ 
Alternatively if you would 
like to order one with your 
credit card or if you want 
_ the address of your nearest 
supplier just phone 


Ol-200 0200 or 0933-79300. 








The BBC Microcomputer System. 


Designed, preduced and distributed by Acorn Computers Limited. 
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GETTING MORE 
FROM THE 64 


PART 3 


Our final article in this series looks at the sound 
capabilities of the Commodore 64 (and some of 
the errors in the User Manual!) 





here is no doubt that good 

sound effects can make even 

the simplest of games much 
more exciting to play. But the use of 
sound in computing need not be res- 
tricted to the games applications. 
Sound, when used properly, can pro- 
vide as much information as several 
lines of text. Warming tones, advisory 
tones, audio feedback on data entry 
and, on the more advanced 
machines, real music are all 
possibilities. 

The sound system on the Com- 
modore 64 is well able to provide 
almost limitless sound effects and 
excellent music. And because the 
sound facilities are accessed by 
~ POKEing individual registers the sys- 
tem is very flexible. This allows 
experimentation with all sorts of 
unlikely combinations of tones and 
filters when developing sound 
effects. 


THE SOUND SYSTEM 
ORGANISATION 


The sound system is controlled by 
the Sound Interface Device or SID 
chip for short. Internally it has three 
completely separate sound channels 
-or voices. The voices are organised 
as shown in Fig. |. 

Each of the sound sources can 
produce four different waveforms, 
triangular, sawtooth, rectangular 
(pulse) and white noise. The frequen- 
cies of each of the waveforms can be 
individually varied and the pulse 
width ratio of the rectangular wave- 
form can also be varied. Figure 2 
shows the shapes of the four different 
wavetorms. For any particular note, 
these four waveforms produce very 
different sounds. 

The sound is then fed into an 
envelope shaper where the Sustain 
level and the Attack, Decay and 
Release rates can be set up (the 
ADSR envelope). Figure 3 shows a 
typical ADSR envelope. It is this 
envelope shape which gives musical 
instruments their distinctive sounds 


and it is possible to ‘simulate’ some of 


them quite well. Altematively new 
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duced at this stage. These are a high 
pass, alow pass and a band pass 
filter. The cutoff frequencies of these 
filters can be individually selected. 
Figure 4 shows the effects of the 
three types of filter. 


THE SOUND 
SOURCES 


Commodore call the sound sources 
‘waveform generators and they have 
two main functions: 

@ To produce a note of the selected 
frequency in the selected waveform. 
@ To enable the waveform genera- 
tor output to be turned on or off. 

For each voice both these functions 
are controlled by the same register, 
the voice control register. These 
control registers are at the following 
locations: 


. Voice | = 54276 

Voice 2 = 54283* 

Voice 3 = 54290 
*NOTE — this register is incorrectly 
specitied as 54288 in our version ol 
the User Manual. 

The contents of each of the con- 
trol registers are very similar (we will 
look at the differences between them 
later). The bits within the registers are 
used as follows: 

7 White noise select (1 = ON) 

6 Pulse waveform select (1 = ON) 

5 Sawtooth waveform select 

(1 = ON) 

4 Triangle waveiomm select 

Ch. OD 
Bits 1-3 do not concem us here. 
Leave them at O. 


VOICE 1 
ENVELOPE 
SHAPER 
VOICE 2 
ENVELOPE 
SHAPER 


VOICE 3 
ENVELOPE 
SHAPER 


VOICE 1 
SOUND 
SOURCE 


VOICE 2 
SOUND 
SOURCE 


MASTER 
VOLUME 


AND 
FILTERS 


VOICE 3 
SOUND 
SOURCE 


Fig. 1 The organisation of the 
voices. 


‘computer instrument’ sounds can be 
produced by using other envelope 
shapes. 

Finally the outputs from the three 
voices are brought together under a 
master volume control. Three types 
of tone filtering can also be intro- 


(a) (c) 
AMPLITUDE AMPLITUDE 


SAWTOOTH WAVE 


TRIANGULAR WAVE 





(b) (d) 
NOISE 


AMPLITUDE AMPLITUDE 


|} ! IN 


TH ” 


Fig. 2 Four different waveforms. (a) Sawtooth (b) Triangular wave 
(c) Rectangular wave (d) Noise. 


RECTANGULAR WAVE 
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VOLUME 


SUSTAIN LEVEL 


| 
| ATTACK | DECAY 
| RATE 

| 


Fig. 3 Atypical ADSR envelope. 


O Gate bit (1 = Start attack/ 
decay/sustain cycle). 
(O = Start release 

cycle) 
From this you can see that there are 
two decimal values for each wave- 
form type: one for the attack/decay/ 
sustain cycle and one for the release 
cycle. Table 1 shows the two values 
of each waveform. 

The procedure for playing any 
given note is: 
@ Start attack/decay/sustain cycle 
(POKE voice control register, Attack/ 
decay/sustain value). 
@ Hold sustain for length of note 
(Count note length). 
@ When note has finished, start 
release (POKE voice control register, 


(a) BAND PASS FILTER 
VOLUME 


pepe ene FREQUENCY 
(b) 


VOLUME LOW PASS FILTER 


CUT-OFF FREQUENCY 
(c) 


VOLUME HIGH PASS FILTER 


CUT-OFF FREQUENCY 


Fig. 4 The effects of various types 
of filter. (a) Band pass (b) Low 
pass (c) High pass. 
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| 
SUSTAIN RELEASE | 
PERIOD — RATE | 

| 


Release value). 

The length of the note depends on 
the type of note being played 
(crotchets, quavers and so on all 
have different lengths). The obvious 
way to time this delay is with a 
simple FOR-NEXT loop. You will 
need to determine by trial and error 
the delay required for a crotchet to 
sound the right length, but having 
found this value all the other note 
lengths are simply multiples of this 
value. 


PITCHING IT RIGHT 


Selecting the frequency of the 
desired note is a little bit more dit 
ficult. For each voice the frequency 
of the waveform generator output is 
determined by the values in two 
registers, the high frequency control 
register and the low frequency con- 
trol register. Table 2 shows where the 
frequency control registers for each 
voice are located. 

The two frequency control regis- 
ters are ‘read’ by the SID chip as a 
single 16-bit register giving 65536 
different selectable frequency ‘steps. 





The wavetorm generators in the SID 
chip can generate frequencies in the 
range O to 4000 Hz, so that each 
selectable frequency step changes 
the frequency by only 0.06 Hz. Now, 
we dont believe that anyone can tell 
the difference between two adjacent 
steps that are only 0.06 Hz apart! 

Within this range of frequencies is 
a full eight octaves of musical notes. 
Appendix M in the User Manual lists 
the high and low frequency values 
needed to produce 95 of the 96 
notes. (More about the 96th note 
later). These values should not be 
taken as the gospel truth — indeed a 
musician would throw up his hands 
in horror if he saw them! The reason 
is to do with the way in which the 
musical scale is constructed. The 
root note of the scale is usually taken 
to be A above middle C, which is in 
octave 4 of appendix M. This note 
has a frequency of exactly 440 Hz at 
concert pitch and all computers and 
synthesizers calculate the other notes 
from this one such that each note is 
21/12 (the twelfth root of two) times 
the previous note. ‘Real’ notes are 
not exactly this distance apart but 
you need a good ear to be able to 
tell the difference. Table 3 gives a 
comparison between the Com- 
modore 64 trequencies and ‘real 
note’ frequencies for A above middle 
C and middle C. 

The result of all this is that if the 
values listed in appendix M do not 
sound right to you then feel tree to 
change them quite drastically. (At 
0.06 Hz a step some values may 
change by quite a lot!) 

Finally, when using the rec- 
tangular waveform, there is a little bit 
more work to be done because we 
also have to set up the pulse width 
ratio. This value defines how wide 
the high part of the rectangular wave 
will be. (See also Fig. 2). Different 







Sawtooth 
Triangle 


High Pulse Width 


register 


Waveform Attack/decay/sustain Release 
type Gate bit = 1 Gate bit = 0 
Noise 129 128 
Pulse 65 64 


33 te 
ie 16 


Table 1. Control register values for the various types of waveform. 








Low Pulse Width 
register 


94275 94274 
94282 9428 | 
94289 , 94288 





Table 2. Locations in memory of the frequency control registers. 





Note name 


A above middle C 
middle C 





Commodore Real note 
frequency frequency 
440.0 Hz 440.0 Hz 


261.6 Hz 


| Table 3. Frequency comparison table. 







264.0 Hz 
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values of pulse width can produce 
an enormous difference in the sound 
of rectangular waves. | 

For each voice the pulse width is 
specified as a 12-bit number, giving 
4096 different steps. The high four 
bits of this number are specified in 
the High Pulse Width register and 
the low eight bits are specified in the 
Low Pulse Width register. Table 4 
shows the locations of the high and 
low pulse width registers for each 
voice. 

The system has been arranged so 
that a pulse width of 4095 gives an 
output that is permanently high 
(maximum width) and a pulse width 
of O is permanently low (minimum 
width). In both cases the output will 
be zero. Normally, of course, we will 
be using values in between these 
two — typically 2048 which pro- 
duces a pure square wave. 


SCALING THINGS UP 


When it comes to actually storing the 
different notes you clearly don't want 
to have to store the values for them 
all, sosome means of calculating 
them is required. The simplest way is 
to make use of the fact that the notes 
in one octave are twice the fre- 
quency of the notes in the octave 
below. This means that if we store the 
high and low frequency values for 
the highest octave we can calculate 
all the other octaves by successively 
dividing by 2. 

To do this easily the high and low 
frequency values must be combined 
into one 16-bit value. This can be 
done as follows:- 


16-bit freq = (high freq) *256 + 
low freq 


Incidentally, the inverse of this which 
restores the high and low values trom 
a 16-bit value is: 


high freq = INT(16-bit freq/256) 
low freq = 16-bit freq - high freq 


If you were to calculate the 16-bit 
value of the highest octave notes in 
appendix M of the User Manual you 
would obtain the values given in 


Table 5. 


The procedure tor calculating 
any note is: 
Get the name and octave of the 
required note. 
Read the 16-bit trequency value for 
the given note from the highest 
octave values given in Table 4. 
IF the octave number is 7 
THEN 
Do nothing 
BLok 
FOR count = 6 TO octave 
number STEP —] 
Frequency value 
= frequency value / 2 


NEXT count 
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Note High 
name frequency 
cS 137 
C# 145 
D ts 
D# 163 
ie 172 
2 183 
F+# 193 
G 205 
GH 217 
A 230 
A# 244 
B 258 


High frequency 
control register 


94273 
2 54280 
Bo, 94287 


Table 4. Locations in memory of the high and low pulse width registers. 











Low frequency 
control register 


94272 
94279 
. 54286 


Low 16-bit 
frequency frequency 
43 Roe ee. 
83 37203 
247 39415 
on 41759 
210 44242 
tg 46873 
pte 49660 
139 82013 
189 55741 
176 59056 
103 62567 
24) 66289* 


* NOTE — this value is not included in the list in appendix M because it is greater than 65535 
and therefore it cannot be ‘played’ by the SID chip. We have included it for completeness, partly 
because it is the 96th note and completes the eight octaves, but mainly so that the ‘B’ note of the 


lower octaves can be calculated from it. 


Table 5. Notes in the highest octave and their 16-bit frequencies. 


Recover high and low frequency 
values from the 16-bit frequency 
value remaining and POKE these 
values into the high and low tre- 
quency control registers. 


SHAPING UP 


So far we have obtained a particular 
note being ‘played’ in a particular 
waveform. To make the note sound 
as though it were coming from, say, a 
violin or a guitar, we need to adjust 
its attack, decay and release rates 
and its sustain level. The effect that 
each of these parameters has on a 
note can be seen by referring to 

iegie rte! 

The Attack rate: This is the rate at 
which the note rises from zero to 
peak volume when the gate bit is set 
out 

The Decay rate: This is the rate at 
which the note falls from its peak 
volume to its ‘average’ or sustain 
level. 

The Sustain level: This is the pro- 
portion of the peak volume that the 
decay rate will fall to. 

The Release rate: This is the rate at 
which the note dies away when the 
gate bit is set to O, although very 
often a new note starts before the old 
note has fully died away. 

Each of these parameters can be 
varied in 16 different steps and since 
16 states can be coded into four bits 
of binary, two parameters can be 
fitted into one eight-bit register. For 
each voice, the attack and decay 
parameters are contained in the 
Attack/Decay cycle control register 
and the sustain and release 
parameters are contained in the 
Sustain/Release cycle control 


register. Table 6 shows where the 
two cycle control registers for each 
voice are located. 

Within the Attack/Decay eycle 
control registers, the high four bits. 
define the attack rate and the low 
four bits define the decay rate. Table 
7 shows the rates which the different 
values of attack and decay can 
select. Within the Sustain/Release 
cycle control registers the high four 
bits detine the sustain level and the 
low four bits define the release rate. 
Table 7 also shows the rates which 
the different release values can 
select, and the levels which the dit 
ferent sustain values can select. 

Appendix P of the User's Manual 
gives some sample ADSR settings for 
‘simulating’ some common musical 
instruments. Personally we're not very 
impressed by the results, because 
there's a lot more ‘real’ sound than 
just the waveform and envelope 
shape. We think that it is much more 
satisfying to create new and different 
sounds. (After all you could have 
bought a real instrument for the price 
you paid for the Commodore 64!). 


USING THE FILTERS 


You don't have to use the filters at all 
if you don't need them. In fact, you 
can produce hours of perfectly 
acceptable music without ever even 
thinking about them. The filters are 
really for ‘fine tuning’ a sound, to get 
just the quality you desire. For this 
reason they probably have more 
uses in sound effects than in music. 
In any case, the sort of filtering 
you want to do will depend on the 
wavetorm you are using. This is 
because the different waveforms all 
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Attack/Decay cycle 







Sustain/Release cycle 
control register control register 
] | 54277 | 54278 
2 : 24284 54285* 
be oy ST ie 94292 





* NOTE: — this register is incorrectly specified at 54286 in our version of the User Manual. 
Table 6. Locations in memory of the cycle control registers. 





Register Attack Decay/Release Sustain 
value rate rate level 
O 2mS 6 mS 0% 
] 8 mS 24 mS 6% 
2 16 mS 48 mS 13% 
3 24 mS 72 mS 20 % 
4 38 mS 114 mS 26 % 
5 56 mS 168 mS 33 % 
6 68 mS 204 mS 40 % 
7 80 mS 240 mS 46 % 
8 100 mS 300 mS 53 % 
9 250 mS : 750 mS 60 % 
10 500 mS hos "9 
1] 3 800 mS wa5 73% 
12 LS ce 80 % 
13 oo 98S 86 % 
14 : aS hos 93% 
Ibe) ee 24:3 100% 


Table 7. Control register values and their effects. 


have different harmonic structures. 
. Harmonics are waves produced 
in addition to the generated or ‘fun- 
damental’ wave. They are always 
integer multiples of the fundamental 
frequency and they have names 
which reflect this. For example, the 
second harmonic has a frequency of 
twice the fundamental, the third har- 
monic a frequency of three times the 
fundamental, and so on. 

Some waveforms, like the saw- 
tooth waveform, contain all the har- 
monics, others, like the triangular 
wavelorm, contain only the odd har- 
monics. In addition, the amount of 
each harmonic present depends 
upon the waveform. The triangular 
waveform, for example, contains har- 
monics in proportion to the recipro- 
cal of the square of the harmonic 
number: others, like the sawtooth 
wavetorm, contain harmonics in pro- 
portion to the reciprocal of the har- 
monic number alone. 

When you decide to use the 
filters it is mainly the harmonics 
which you will be filtering out 
because, like the envelope shape, 


they contain a lot of the ‘individuality’ 
of a given sound. | 

The three filters are actually 
derived from one programable filter 
withn the SID chip. This filter can be 
programmed to act on any combina- 
tion of the three voices using any 
combination of the three filter types 
(high pass, low pass and band pass). 
The programming is done by using 
two filter control registers. One, 
called the Voice Input control regis- 
ter, at location 54295 decimal, 
selects the voices to be filtered. 
Table 8 shows which bits select 
which voices. | 

The other control register, the 
Filter Mode control register, at loca- 
tion 94296 decimal, is also the mas- 
ter volume control. Table 9 shows the 
utilisation of bits within this register. 

Having selected the voice and 
filter combinations we require, all 
that remains is to set the cut-off fre- 
quency for the filter. The cut-off fre- 
quency is the frequency at which the 
tilter operates. For example, at the 
cut-off frequency the low pass filter 
will start to reject frequencies. As the 






BitO — Voice 1 filter control (1=Filter, O=Don't filter) 


Bit | — Voice 2 filter control (1=Filter, O=Don't filter) 






Bit 2 — Voice 3 filter control (1=Filter, O=Don't filter) 






Bits 3 to 7 — Do not concern us here. 






Table 8. Bit functions in the filter voice input control 
register (located at 54295 decimal). 
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Bits O to 3 — Sef master volume (O=Off, 15=Full volume) 
Bit 4 — Select low pass filter (1=On) 
Bit 5 — Select band pass filter (1=On) 
Bit 6 — Select high pass filter (1=On) 


Bit 7 — Does not concer us here 


Table 9. Bit functions in the filter mode control 
register (located at 54296 decimal). 


frequencies increase away from the 
cut- olf the rejection increases. (See 
also Fig. 4). 

The cut-off frequency is specified 
as an 11-bit number using two regis- 
ters in a rather strange way. The high 
eight bits of the cut-off frequency are 
specified in the high cut-off fre- 
quency register at location 54294 
decimal. The low three bits are 
specitied in bits 0-2 of the low cutoff 
frequency register at location 54293 
decimal. Bits 3-7 are not used. This 
gives a total of 2048 different cut-off 
trequency steps. The SID chip filter 
can operate over the range 30 to 
12000 Hz so that each cut-off fre- 
quency step changes the cut-off fre- 
quency by about 6 Hz. This should 
be fine enough control for most 
applications. : 

The procedure for using the filters 
is: 
Select the filter type and master 
volume to be used (POKE 54296, 
tilter type and volume). , 
Select the cut-off frequency (POKE 
04294, high cut-off: POKE ae, 
low cut-off). 
Select the voices to be filtered 
(POKE 542295, voice combination). 


AND FINALLY 


That's all for this month and for this 
short series on the Commodore 64. 
We hope that it's been both interest- 
ing and useful. And keep watching 
this space — we'll be back with more 
Commodore goodies. (Editor permit: 
ting of course!). 
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Feature: Graphics standards 





CT STANDARDS 


Our regular page explaining the meaning of 


the various symbols we 
portable. 


use to make programs 





t has been very encouraging to 

see the number of programs 

submitted using our standard codes for 
graphics and other non-printable 
characters. However, it has also become 
increasingly clear that some of our readers 
haven't heard of them and this page is 
intended to set them out once again. 

All standards tend to be irksome to 
adhere to but the ones laid out here are 
fairly simple and tend to make software 
easier to maintain by the programmer and 
simpler to understand for others. 


CONTROL THAT CURSOR 


Our original standards have now grown with 
the times. Machines such as the Commodore 
VIC which have a dual Shift capability can 
now be incorporated, as can those systems 
which use Control key functions. 

The recently introduced BBC. system 
offers pre-programmed function keys which, 
we are glad to say, can also be handled by 
our original coding system. It's nice to see 
just how well adapted the original standards 
have become over the last two years! 
(Indeed, a whole series of books is using 
them as its de-facto standard.) The 
standards for the cursor controls are given 
in Fig. 1. 


Clear 5S 


CCL 
CHOMI 
PCL 3 Cursor 
CCH I Cursor 
EGCUI Cursor 
PED Cursor 
CREVI 


Turn it 
SF aCe 


CGFE 3 
FSPC4 
55 od gM 


REVerse 


headaches. This is really specific to the PET 
where the character set can be displayed in 
reversed video. On machines which don't 
have this facility you should either find a 
character in the set which is the reversed 
image of the one you want and use that or 
simply ignore it and use anything else you 
fancy! Don't forget, you may have to look up 
and alter the values used elsewhere in the 
program. 


THE GRAPHIC SOLUTION 


It soon became obvious that the techniques 
applied to the confusing cursor controls 
could also be applied to the graphics 
symbols. The following standard is now in 
general use in programs published in 
Computing Today. 

If a graphics character or characters are 
to be displayed in a listing (as opposed to 
POKE codes or CHR§( ) codes) then they 
are indicated by the method shown in Fig. 
2. 


Several people have asked what the 
relationship between the POKE value for a 
character and that of its shifted graphic 
might be. In general the shifted version of 
any character will be 64 greater than the 
value of that character. This applies to both 
PET and MZ-80K systems in all cases. 


Creer 


HOMe cursor 


Left 

Right 

Up 

Down 
video oan 
OFF 


Control key 


Cfnd Function key ‘HHC) 


(Ge Graphic 


left (VIC/MZ-B80A) 


Bie ag Graphic right (VIC/MZ-S0A) 


Fig. 4. Our extended set of cursor control standards includes four new 


functions. 


To indicate more than. one of the above, an 
optional number can be placed within the 
brackets; [4 CL], etc. 

The use of square brackets has raised 
one or two queries. The reason for this 
choice is that most of the common 
microcomputer BASICs don't use them for 
specific functions. In fact, at least one 
machine provides an added bonus by 
returning a Syntax Error if they are found, a 
useful check in case you type them in by 
mistake. 

The code [SPC] was added to the list 
of cursor control codes to get over the 
problem of indicating just how many spaces 
are contained in the gap in the printout. 
The other common variant of the code for 
spaces is used by the ZX people. Their 
choice was and this crops up in the 
various newsletters they publish. 

The code [RVS] has caused a few 
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CT STANDARDS 





This can be taken further to include 
machines which use a pixel graphics set 
rather than pre-programmed PET-style 
characters and the series of codes for these 
is given in Fig. 3. As is nearly always the 
case there is one machine to which the 
standard shown in Fig. 3 does not apply — 
Tangerine’s Microtan/Micron. This machine 
uses a four by two cell structure for its pixel 
graphics instead of the Prestel/Teletext three 
by two cell. The method for calculating the 
value to assign to ‘P’ is shown in Fig. 4, and 
is fortunately nice and simple. 


MAKING REMARKS 


Many people scorn the use of REMs within 
programs but, during the development at 
least, they are extremely useful. One of the 
documentation methods that we use is to 
keep our back-up copy of our programs on 
a 300 Baud CUTS tape with all the REMs in 
place: the working copy, be it on tape or 
disc, is REMless in order to save space. 

It is also good programming ‘manners’ 
to give your REMs odd line numbers: 


3999 REM ** CRASH PROOF INPUT 
4000 INPUT “THE NUMBER OF ENTRIES “A 


A remarkable number of submitted 
programs have jumps that go not to the 
relevant point in the program, but to the 
REM statement. This can cause severe 
problems when re-numbering after 
removing the REMs. 


ALPHA KEY TO BE SHIFTED 
INDICATES ‘SHIFT’ KEY 


NUMBER OF TIMES IT OCCURS 


Fig. 2. The way we indicate block 


graphics on machines like the PET 
and Sharp. The VIC system of Shift 
Left and Shift Right is shown in Fig. 4. 


Fig. 4. To convert a Tangerine pixel 
code into its blocks, simply decode 
the number into its binary or Hex 
value and fill in the relevant 
squares. 
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Fig. 3. The standard pixel codes; they will work on most computers which 
employ this technique as well as for Teletext and Prestel. 
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Review: Latest computing books 


Garry Marshall 








BOOK PAGE 


This month our reviewer looks at several books 
which cover aspects of computing that go beyond 
simple BASIC programming on your micro. 





tion computers recently. After 

spending ages wading through it 
I wasn't impressed. If only I had 
waited a bit longer I could have 
saved myself a lot of time, for this 
month a book has arrived that gives 
a splendid explanation of what the 
fifth generation is all about. It is also 
probably the most important com- 
puter book of the year. Besides this, 
this month's selection of books 
includes three books for the BBC 
Micro that are essentially courses on 
how to go beyond BASIC with it by 
using. other languages, and one 
about writing games in Pascal. The 
sixth and final book brings us neatly 
in a full circle, because it is about 
writing expert systems to run on a 
micro. Expert systems, of course, are 
at the heart of the fifth generation 
developments. 

The Fifth Generation by 
Edward A. Feigenbaum and Pamela 
McCorduck is fundamentally a pro- 
paganda job to alert American 
government and industry to the 
authors’ view that America is losing 
its lead in computing over Japan at 
the rate of one day per day as a 
result of the Japanese national plans 
for the development of fifth genera- 
tion computers. This assertion is never 
really shown to be true, though, and 
while I don't want to dwell on the 
politics of fifth generation develop- 
ments, a couple of remarks may be 
worth making. There is a fundamen- 
tal difference between the 
approaches of the Americans and 
the Japanese computer companies 
to research. The American com- 
panies are all in intense competition 
and unlikely to share their findings, 
while the Japanese companies are 
collaborating with each other. At the 
same time a great deal of research is 
going on in American computer 
laboratories on the topics that are 
involved in developing the fifth 
generation. It has not yet been 
shown that the Japanese approach is 
superior to the American. Secondly, 
the Japanese plans for the fifth 
generation require that technological 
breakthroughs be achieved as 
scheduled activities. This shows 
clearly the nature of the plans and 
the degree of risk that is involved. 
The argument goes that even if the 


I reviewed a book on fifth genera- 


Japanese only achieve a small pro- 
portion of their aims they will still 
achieve an awtul lot. But how clear is 
it that this means they will achieve 
more than the Americans? 

Anyway, to the book. Feigen- 
baum is Professor of Computer 
Science at Stanford University and, 
as head of the Heuristics Program- 
ming Project there, is one of the 
founding fathers of Artificial 
Intelligence and has established one 
of the world’s major Artificial 
Intelligence groups. This makes him 
as well qualified as anybody to 
assess the fifth generation plans. The 
first part of the book contains a very 
readable description of the aims of 
the fifth generation, of which I shall 
say no more having devoted a good 
deal of space to it only recently. In 
passing, this part of the book 
demonstrates quite clearly why 
today's children need to know about 
computers and computing by show- 
ing the extend to which their futures 
are likely to depend on them. So if 
anyone still doubts the value of hav- 
ing computers in every school in the 
country, let them read this book 
caretully. 

The second 


author, Pamela 


McCorduck is a writer on science 
and | take it to be her influence that 
has resulted in the most unfortunate 
style with which some parts of the 
book are written. To illustrate, Part 2 
begins with ‘Pamela McCorduck was 





BOOK PAGE 


introduced to the idea of artificial 
intelligence ... . in 1959, by Feigen- 
baum as it happened, when comput- 
ing, its natural child called artificial 
intelligence and certainly they them- 
selves were all much _ younger. 
Although it is a matter of taste, this 
makes me cringe: it smacks of ‘fac- 
tion and tends to diminish the 
credibility of the book. An account of 
the development of artificial 
intelligence proceeds in this style 
and while Feigenbaum obviously 
belongs in it (self-referentially or not) 
it is not clear to me what McCorduck 
is doing there even if she was a 
spectator. 

However, if the style of the book is 
irritating at times, its content is suf- 
ficiently fascinating to make up for 
that. It explains very well that 
knowledge and information have a 
value of their own, and unless it is 
understood that knowledge is valu- 
able the whole basis of the fifth 
generation is inscrutable. That 
readily available computing power 
and capability can do so much more 
than simply store knowledge, and 
that it can enhance and even create 
it, is pertectly illustrated by the story 
of how one of the most influential 
books on the design of VLSI circuitry, 
Introduction to VLSI Systems by 
Mead and Conway, was brought to 
fruition. Its final form, and the short 
time taken to reach it, both resulted 
directly from the instant availability 
of the draft manuscript to many 
interested parties via the ARPA net- 
work. Making the draft manuscript 
available by this computer com- 
munications network allowed many 
people working in VLSI design to 
read, test, comment upon and sug- 
gest amendments and __ further 
material for it. This form of collabora- 
tion and opportunity for interaction 
permitted the book to take a final 
form, on a very short time scale, 
which could have been achieved in 
no other way. Thus, the existence of 
a computer communications network 
led directly to the creation of an 
important body of knowledge. 

The book itself is a fine account of 
all the factors involved in the fifth 
generation developments. Even with 
a rather hectoring propagandist 
approach and its unfortunate style, 
its contents are never less than fas- 
cinating and stimulating. 

The sub-title of Beyond Basic 
by Richard Freeman is ‘6502 
assembly language programming for 
the BBC Microcomputer, and this 
says exactly waht the book is all 
about. It is a carefully paced course 
of assembly codé programming 
using the BBC Micro's ‘BASIC assem- 
bler’, with which assembly code seg- 


ments can be inserted directly into a > 


BASIC program by enclosing them in 
square brackets. The course covers 
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the usual standard material on 
assembly code programming from 
simple arithmetic through loops and 
branches, addressing modes, mul- 
tiplication and division to the use of 
the stack, masking and subroutines. 
It also covers the oddities of the BBC 
Micro's assembly code programming 
system, such as how to generate the 
two-pass assembly process that is 
necessary, for example, to deal with 
forward references to labels in 
assembly code programs. Al- 
together, the book provides an 
absolutely standard and - solid, 
though unimaginative, introduction 
to its subject. It should teach the 
newcomer to assembly code pro- 
gramming on the BBC Micro every- 
thing that is necessary to achieve 
competence. It is, however, difficult 
to recommend the book to anyone 
outside its target audience, as the 
material on assembly code is 
covered by many other books in 
exactly the same form, and _ the 
material on the oddities of the BBC 
Micro is obviously of no interest if you 
use another computer. 

LISP on the BBC Microcom- 
puter by Arthur Norman and Gillian 
Catell and FORTH on the BBC 
Microcomputer by Richard de 
Grandis-Harrison are both manuals 
to accompany Acornsoft's implemen- 
tations of the respective languages 
for the BBC Micro. The LISP book is 
impressive and interesting, but it is 
my impression that it would be dit 
ficult for the newcomer to LISP to 
progress to the writing of substantial 
and useful LISP programs with it 
alone. It presents many examples, 
but does not spell out the underlying 
principles of LISP. It also presents a 
good deal of material that is of no 
interest to the newcomer to LISP, but 
which is only of historical interest. It 
also passes rather quickly from 


30 


Nag 


introducing the features of LISP to 


MW presenting rather sketchy outlines ot 


medium-sized projects for program- 
ming in LISP. Some of the latter are 
rather imaginative, from a route-finder 
to an. adventure game. Thus, 
although not well suited to the begin- 
ner, it is valuable as a source of 
reference and as a source of ideas to 
the fairly experienced LISP program- 
met with ac sBBO Mier... This, 
however, makes the area of interest 
in the book a rather restricted one. 
The FORTH book is also a good, 
even essential source of reference for 
FORTH on the BBC Micro. Unfor- 
tunately, despite a length of almost 
300 pages, it contains few examples 
programs for applications of any 
consequence, so that it is short on 
‘motivational material which is par- 
ticularly necessary with a language 
as unreadable as FORTH. This 
FORTH book was mentioned by D. 5S. 
Peckett in his article ‘Going FORTH 
Again’ in the July 1983 issue of Com- 
puting Today as suffering from pro- 
duction delays. Acomsoft assure us 
that their production problems have 
now been solved and that the book, 
and the language itself, are now 
readily available. Despite this, | can- 
not recommend that you rush out 
and buy it, even if you are a FORTH 
enthusiast with a BBC Micro, as it is 
much too stodgy for my taste. 
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To show that it is possible to write 
an interesting book on programming 
in a language other than BASIC for a 
specific micro, it is only necessary to } 
tun to Pascal Programs for | nn 
Games and Graphics in UCSD 
| Pascal for the Apple by Tom Swan. 
Here we have a series of programs 
for imaginative games written in Pas- 
cal with a beautifully clean and clear 
style. Thus, at the same time we have 
a mine of ideas for games and for 
graphics (since all the programs 
make good use of graphics) as well 
as a practical primer on the writing of 
well-structured programs. Even if you 
don't have a Pascal system, the book 
is worth considering, for the pro- 
grams are so well written that the 
task of translating them to BASIC is 
as easy as it can be. A suite of pro- 
grams for a graphics editor is also 
given: that is, for a system to handle 
graphics in much the same way as a 
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the book which is to show us how to 

write Our own expert system on our 
} own micro. It includes program list- 
| ings for the Spectrum and Apple II, 
and although there is an error in the 
third line of the very first program, 
this is fortunately not typical of all the 
programs in the book. In fact, all the 
Spectrum programs are reproduced 
from listings on the Sinclair printer 
and so can be presumed to be 
accurate. 

The last two books are the kind I, 
for one, should like to see more of. By 
demonstrating novel and imagina- 
tive ways of programming and using 
micros, they can only help the pro- 
gress of the whole micro scene. 

This month's books are: 


The Fifth Generation by Edward A. 
Feigenbaum and Pamela McCorduck, 
Michael Jospeh, 275 pages, £9.95. 
‘Beyond BASIC by Richard Freeman, 
BBC and NEC, 256 pages, £7.25. 


word processor handles text. Con- 
verting this for your system could also 
be a rewarding task. In this way, the 
book is a good one for its target 
audience, but it is also of value to 
others. Can we have more books like 
this please? 

Also, can we have more along 
the lines of Build Your Own Expert 
System by Chris Naylor? I have to 
admit that I don't much care for his 
style of presentation or his sense of 





humour, and that I would rather not 
have had to plough through his first 
two chapters. The first, ‘Why expert 
systems?’ takes 12 pages to give the 
answer ‘Because that is what the 
book is about’. The second, ‘A statis- 
tical scheme’ is a treatment of basic 
probability theory, not an attractive 
topic, but even less so when we see 
Chapter 3 is called ‘Avoiding pro- 
babilities'! However, I can forgive 
more than this for the idea behind 


LISP on the BBC Microcomputer by 
Arthur Noman and Gillian Cattell, 


Acornsoft, 197 pages, £7.50. 
FORTH on the BBC Microcomputer 


by Richard de  Grandis-Harrison, 
Acornsoft, 280 pages, £7.50. 

Pascal Programs for Games and 
Graphics by Tom Swan, Hayden, 214 
pages, £15.95. 

Build Your Own Expert System by 
Chris Naylor, Sigma Technical Press, 249 
pages, £6.95. 


The Key to Spectrum Machine Code Success. 


Picturesque’s MACHINE CODE SYSTEM is used and recommended by professional software writers, yet the excellent 
fofoteUTaal-lale-lalelab-lalemaat-eaal-lalel hve easy-to-use el meotel ela mar\-woTamalielalageelatalele(emie) mele] lalalace 


me = You willonly buyone Machine Code System sobuy the best, the one the professionals use. 





ASSEMBLER 


Completely self-contained, — 
with its own line editor, giving 
an easy-to-read 40 column 

tabulated listing. Auto line | 

numbering, line renumbering 
and auto-tabulation make 
this the fastest and easiest 

Assembler to use. 5 
character Label names. 
SAVE/LOAD/VERIFY both the 
listing and Machine Code. 

Accepts Decimal or Hex 
wee) =NuUMbers and ALL Z80 
mnemonics. Assembler 
Directives:— ORG, END, 

DEFB, DEFW, DEFS, DEFM, EQU, 

DEFL. FAST ASSEMBLY:— 1K of 
machine code in 7 seconds. Full error detection. 


32 page Owner's Manual. c9 50 
e 


INCL. VAT & P&P. 





The most valuable software purchase you will ever make. 


Available from the "SPECTRUM" chain of stores, branches of Jonn Menzies and all good computer 
shops, or by mail order by sending cheque/PO to: 


PICTURESQUE, 6 Corkscrew Hill, West Wickham, Kent, BR4 9BB. Send SAE for details. 
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MONITOR 


The ideal tool to help the | 
beginner get started, yet it 
contains all the commands for 
the experienced programmer 
to run and de-bug machine 
code programs. 

oS Inspect and alter memory 


contents in Hex or ASCII 
a to 0 aK characters. Breakpoints 
Oe and full Register display. 
maCcH 
E 


Disassemble any part of 
memory, ROM or RAM. 
Dec-Hex-Dec number 

conversion, plus BIOcK 
Move, Insert and Delete 


pICTURESOUE 


memory management. | 
32 page Owner's Manual. Can reside in memory with the 


Assembler (48K machines only) to give a 
complete system. y 7 50 
cy 


INCL. VAT & P&P. 
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first rate. The implementa- 
; tion of Colossal Cave 


ENE NENG ENEMA ENE MEAG NEMEC. 
LORDS OF TIME 


[El 


g Joins our range of acclaimed pure-text puzzle adventures, at £9.90, for: 
y BBC 32k COMMODORE 64 SPECTRUM 23k LYNX 48k NASCOM 32k ORIC 48k ATARI 32k 


g ADVENTURE 
REVIEWS 

g “Adventures which have a 
fast response time, are 
spectacular in the amount 
of detail and number of 
locations, and are available 
-to cassette owners ..!am 
extremely impressed . . The 
Level 9 Adventures are 
superbly designed and 
programmed, the contents 


ts, 
LTS 
V1 tasg, 


LULL 


QT 


(Adventure) is nothing short 
of brilliant; rush out and buy 
it. While you're at it, buy 


their others too. Simply 
Smashing!” 
- SOFT, Sept 83 


“| found Dungeon 
exceedingly well planned 
a and written, with a fast 
response. There are well 
over 200 locations and the 
descriptions are both 
lengthy and interesting. The 
objects number about 100. 
It could therefore take 
some months to explore 
the whole network, giving 
many hours of enjoyment in 
the process.” 
—-C&VG, Sept 83 
“The descriptions are So 
good that few players could 
fail to be ensnared by the 
realism of the mythical 
worlds where they are the 
hero or heroine .. .great fun 
to play.” 


—Which Micro?, Aug 83 
“My appetite has been 
whetted and | intend to get 
my own copy (of Snowball) 
to play.’ 


f 7 
NAL 
NW | 


LLL 
pe 


LULL, 


— What Micro?, Dec 83 
g MIDDLE EARTH ADVENTURES 


1: COLOSSAL ADVENTURE 
A complete, full size version of the classic mainframe game 


“Adventure” with 70 bonus locations added. 
2: ADVENTURE QUEST 


Centuries have passed since the time of Colossal Adventure 
and evil armies have invaded The Land. The way is long and 
dangerous; but with cunning you can overcome all obstacles 
on the way to the Black Tower, source of their demonic 


power, and destroy it. 
3: DUNGEON ADVENTURE 


The trilogy is completed by this superb adventure, set in the 
Dungeons beneath the shattered Black Tower. A sense of 
humour is essential! 


gi THE FIRST SILICON DREAM ADVENTURE 


1: SNOWBALL 


The first of Pete Austin’s second trilogy. The giant colony 
-Starship, Snowball 9, has been sabotaged and is heading for 


Ra the sun in this massive game with 7000 locations. 





ADVENTURE 
REVIEWS 


“This has to be the bargain 
of the year. If adventures 
are your game then this 
(Colossal Adventure) is 
.your adventure.” 

—HCW, 5 Sept 83 


“Colossal Adventure is 
simply superb. Anyone who 
wishes to use adventures in 
an educational setting 
really must use and see this 
program as it emulates 
Crowther and Wood's 
masterpiece so well. For 
those who wish to move 
onto another adventure of 
similar high quality, 
Dungeon Adventure is to be 
recommended. With more 
than 200 locations, 700 
messages and 100 objects 
it will tease and delight!” 

— Educational Computing, Nov 83 


Colossal Adventure is 
included in Practical 
Computing’s Top 10 games 
choice: “Poetic, moving and 
tough as hell.” 

-PC, Dec 83 


“To sum up, Adventure 
Quest is a wonderful 
program, fast, exciting and 
challenging. If you like 
adventures then this one is 
for you” 

—NILUG # 1.3 


“Colossal Adventure . . For 
once here's a program that 
lives up toitsname..a 
masterful feat. Thoroughly 
recommended” 

— Computer Choice, Dec 83 


“wholly admirable” 
— Your Computer, Sept 83 


THE LORDS OF TIME SAGA 


7: LORDS OF TIME 

Our congratulations to Sue Gazzard for her super design for 
this new time travel adventure through the ages of world 
history. Chill to the Ice-age, go romin’ with Caeser’s legions, 
shed light on the Dark Ages etc. etc. We'll be selling this 
game mail-order from January 1st. 





Price: £9.90 each (inclusive) 


Level 9 adventures are available from good computer shops, 
or mail-order from us at no extra charge. Please send order, 
or SAE for catalogue, to: 


LEVEL 9 COMPUTING 


Dept ©, 229 Hughenden Road, High Wycombe, Bucks 
HR13-5F5 


Please describe your Computer 
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Software: Genie monitor 





G-MON 





John Fairbairn 





COLOUR GENIE 


MONITOR 





G-Mon is a comprehensive machine code 
monitor written for the Colour Genie. Now 
there’s no excuse for not getting to grips with 


your Z80. 





ike many people who learnt 
Z80 machine language on the 

Video Genie/TRS 80 system, 
my first monitor was I-Bug. In my 
innocence | used this for months, 
thinking it must be the bee’s knees 
as it was produced by Tandy. As my 
experience grew | became 
frustrated with it, and was pleased 
to see patches in computer 
magazines for some of the 
‘bug’-bears I had encountered. 
Eventually it dawned on me | should 
get another monitor. 

I have been through several 
now, but none of them seems to give 
me what | — and [| believe most 
micro users — really need. 

Most monitors seem to be 
digests of systems written for 
mainframes and minis and we all 
know that people who work on these 
machines never make mistakes. But 
people like me do type J 5323 
instead of J 5332, and our programs 
do jump to non-existent points and 
disappear into the wide blue 
yonder. People like me are always 
forgetting to fix breakpoints after 
setting them, and with the constant 
gnashing of our teeth as we 
relentlessly type our programs back 
in after the inevitable crash, we 
must all be looking more each day 
like the Laplanders who chew 
leather for a living. 

But I lived lazily with all these 
problems until recently my Video 


Genie ground to a halt. This was a 
marvellous opportunity to upgrade 
and | didn't have to stop and think 
what to buy. All the books and tapes 
I'd bought for the VG couldn't be 
allowed to go to waste, so it had to 
be the only compatible machine, 
the Colour Genie. 

Cutting a sob story short, it was 
nothing like as compatible as I'd 
been led to believe, at least where 
machine code is concerned. 
Conversion is possible, but only if 
you can get at the machine code — 
and I couldn't get at that as | 
couldn't get my monitor in. Before 
apathy set in and commercial 
monitors appeared in the shops, | 
decided to write my own monitor 
and to get rid of all those niggles I'd 
had in the past. The result is the 
program here. It isin BASIC, of 
course, as that is the only way to get 
it into the Genie without another 
monitor, but once it is in you can 
save itasa SYSTEM tape. It 
occupies only 770 bytes at the top of 
memory. 


LOADING G-MON 


On power-up you should protect 
high memory for the machine code 
by answering MEM SIZE? with 
30000. Then type the program in 
and CSAVE it, just in case. Then 
RUN the BASIC program (it takes 


about 12 seconds). Nothing visible 
happens — all.that is happening is 
that the values READ in by the 
DATA statements are being put, in 
hexadecimal torm, into high 
memory in the area from @QH7CDO 
to GA ZED: 

When the prompt returns you 
no longer need the BASIC 
program, except as a back-up. It 
you have entered the data correctly 
you should get a checksum of 
86325. You should get a cleared 
screen and a message saying 
G-Mon 1.1 followed by a prompt, $ 
in this case. Now you should check 
all the commands are operating 
pertectly, so let’s run through them. 


G-MON COMMANDS 


Type S and you will return at once 
to BASIC, with your high memory 
still protected. To return to G-Mon 
from BASIC simply CALL 7CDO. 

Type D (the comuter responds 
with D:) and then put in a four- 
figure hexadecimal number (eg 
OOOO will give the start of the ROM, 
7CDO the start of G-Mon) and as 
soon as you have typed the fourth 
digit the comuter will display (or 
dump) a screentul of memory, 
neatly formatted for easy checking 
(128 bytes ata time). Then the 
prompt $ asks for anew command. 
This is one of the facilities lacking 
in T-Bug, by the way (see Photo 1). 

Type R next and the computer 
will display the values of the 
registers (see Photo 2). You 
obviously have to be familiar with 
Z80 machine language to make 
sense of this. Capitals are used for 
the names of the main register set, 
lower case for the alternate 
registers. SP stands for Stack 
Pointer and BP for Break Point (ie 
the location of the last entered 
break point). The values shown are 
those after the last machine code 
instruction, which can include some 
operations caried out by G-Mon on 
returning from your program. This 
command is normally meant to be 
used in conjunction with a break 
point, in which case it is called 
automatically and the register 
values shown are those at the time 
of the break point with no 
interference from G-Mon. 

Now try M. The computer 
responds with M: and you then have 
to give it the four-figure hex 
address at which you want to start 
putting data into memory. This is 
the machine-code way of doing 
what our BASIC program did. 
G-Mon then repeats the address 
and shows its current contents. You 
can then insert data at that point. 
Each entry must be two hex digits. 
As soon as you have typed the two 
digits that value is stored in memory 


‘AS RRP TST BERRA LIRICA AEE EEE A TE EB INANE AEN LENT LRTI TERT LE LS EEE VET ALE LE MRE LE ENTE LE ISTE SS ILL LESSEE IG OBER INE TEE SIE SE EERSTE EBT 
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at that point and the next address is 
printed. To stop inserting data type 
X at any time and you will return to 
the prompt $. To move forward or 
back through memory, without 
affecting the memory contents, type 
either } for forward or 4 for back. In 
the latter case * will be printed to 
warn you you are going back (this 
back-stepping is another feature not 
found in T-Bug). 

Note that the Repeat key will 
work atter all these commands. 

You cannot insert data into 
ROM (if you try it is just ignored) 
and of course you should avoid 
putting anything in the area used by 
G-Mon: 7CDO to 7FFF (‘7FD2 to 
7FFF is its stack area). 

To see M at work, type M:47BF 
and atter the 47BF:20 prompt type 
51. You should see © at the bottom 
right of the screen (the screen 
memory occupies 4400 to 47BF). 
You can also see what you've 
inserted by running through 
memory with M or using D for 
dump. 

Try a jump command now: type 
J. This tells the computer to start 
execution of a program. For the 
start address you are prompted by J: 
and you have to insert’a four-figure 
hex address. If you make a mistake 
you can't backspace. In the case of 
M and D this doesn't matter, but in 
the case of J (and T-Bug) the results 
could be catastrophic if the 
computer acts on your mistake. 
Therefore, as a safety measure, 
once you have put the address in 
you have to type J again to contirm 
execution can begin. Typing any 
other key aborts the instruction and 
returns you to the prompt $. Then 
you can try again. 

Try J: 1A19J and you will return 
to BASIC (equals the S command). 


Or you can try J:7CDOJ and you will 
jump to the start of G-Mon, as your 
screen display will testify. Other 
jumps have to be controlled, so you 
must write your program first. 
Remember, incidentally, all 
programs you write should return to 
a control point when you are 
debugging them. In this case they 
could end with a jump back to 


G-Mon (C3 DO7C). 
BREAKING OUT 


Often when you run a program you 
want to be able to stop it 
somewhere, typically to check the 
state of the registers and memory at 
that point to ensure the programs 
has no bugs so far. For this you 
insert, with B, a breakpoint (like 
STOP in BASIC) at the address 
where you want to stop. This has to 
be a sensible one — you can't stop 
in the middle of an instruction — 
but if you ve done it properly, when 
you run your program (with a J) the 
program stops as soon as that 
address is encountered by the 
program counter. 

G-Mon does three things in that 
case: it prints out the state of the 
registers at the time of the 
breakpoint, it returns the user to the 
prompt $, and it repairs the 
breakpoint. This means you do not 
have to press F to fix the break 
point, as in other monitors. I have 
also done away with the G (tor Go) 
command as | have never used it. 
For single-step breakpointing 
through a program | use another, 
much larger utility. 

Break is one of those 
instructions that can play havoc 
with a program if not done right. 
Therefore when you type B and are 
prompted with B:, you insert your 











hex address in the usual way but 
have to type B again to confirm it 
(any other key aborts the 
instruction). You will then be 
prompted with J: to ensure you do 
perform the program and clear the 
breakpoint. You then type in the 
starting address and J and on return 
to $ (if your program flow is not 
faulty and has not avoided the 
break address) the break point will 
have cleared. 

Note that you can't set a break 
point in the ROM. 

To try this command, first put 
the tollowing instructions into 
memory with the M command 
starting at address 6000: 21 CC 45 
3E 51 77 C3 DO 7C. Then type 
B:6006B and in response to J: type 
6000]. You should see a little flash 
in the middle of the screen and the 
registers will be printed. The only 
ones you used were AF and HL and 
these should read 5100 and 45CC 
respectively. 

But what was that little flash? 
One of the things that most 
intensely annoyed me about my 
previous monitors was that on 
return to the prompt they wiped out 
what was on the screen. If I was 
debugging a graphics or text 
display, that wasn't a lot of help. So 
G-Mon has a Pause command. By 
hitting P you insert a pause just 
before the machine returns from the 


break point. To see this in action, 


type P. An * will be printed asa 
warning then type in the same 
break point and jump point as 
above (6006 and 6000). The * is 
repeated after the B instruction. On 
this occasion you should see that in 
the middle of the screen is a Q. The 
display will pause there until you hit 
any key, then you return to $ with 
the breakpoint and the pause 
cleared. 


TAPE STORAGE 


If the point you jump trom does not 

pass over the break point you have 

set you have lost control and can 

sutfer irreversible damage. If you ‘ 
are worried that might happen and } 
don't want to retype your program, 
the next command is the crucial 
one. W for write writes a SYSTEM 
tape. After W you will get W:. You 
now have to insert three addresses 
in the right order: the starting 
address of the area you want to 
copy; then the end address of the 
area you want to copy (inclusive); 
then the address at which execution 
is to begin (this may be in another 
area). 

Then you have to give your 
saved file aname. Since the 
SYSTEM command reads only the 
first letter of a name it is pointless 
giving ita long name, so only one 
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letter is allowed. Type that letter, 
which is then displayed. Then a 
final check — if any of your input is 
wrong hit any key except W and the 
instruction will be aborted. If you 
are happy, switch on your cassette 
to record and hit W. An-* will be 
displayed to warn you recording is 
taking place. When recording is 
finished the prompt $ returns (you 
have to switch off the cassette now). 
The first priority is to save 
G-Mon asa SYSTEM tape. The full 
instruction for this is W:7CDO 7FD 1 
7TCDO GW. You will then have 








Listing 1. Colour Genie patch. 


created a SYSTEM tape with file 
name G. To load this, or any other 
SYSTEM tape, go back to BASIC, 
type SYSTEM and after the prompt 
? type the file name. Switch on the 
cassette. When the file is found and 
being loaded, asterisks blink on and 
off in the usual way. On completion 
of loading you will be prompted 
with ? again and can load more 
programs (it is your responsiblity to 
see they don't overlap). G-Mon 
loads in about four seconds. 

When all loading is finished 
answer ? with/ then the decimal 
address of the point you want start 
execution, or type / alone and 
execution will start at the address 
specified tor the last loaded tape. At 
any future point if you RESET, you 
can get back to your machine-code 


G-MON 


programs in the same way without 
re-loading. 

It you are already in G-Mon 
and want to load another tape, you 
can call the SYSTEM command up 
from the ROM by means of the 
instruction J:O2B2). 

If you are working with BASIC 
and G-Mon together, it is your 
responsibility to set sufficient area 
free at power-up to allow room for 
all your machine code programs 
above BASIC. Those not working in 
BASIC can use memory from 5800 
up. The low-res graphics screen 
starts at 4400 and the high- 
resolution display area starts at 


4800. 
CONVERSIONS 


G-Mon is not suitable for other 
machines because it uses system- 
dependent code, naturally. But 32K 
Colour Genie owners can relocate 
it to the top of 32K memory by 
loading as above then running the 
program in listing | which should 
be loaded at 6000, using M. Run it 
with J:6000 J then, with M, insert the 


following data at the addresses 


specitied: 

BDDGr UO: BESS: TE 
BOP OO ee BEE FE 
BD91: ‘7E BEAB: 7E 
BD9D: 7E BF 2B: 7E 
BUAB: 7E.  BDSbDi 7 
BDFE: 7E BF4F: 7D 
BEIB: ‘7E DSO TG 


You can now save the revised 
G-Mon on tape with W:BCDO BFD 1 
BCDO GW. 





Listing 2. BASIC listing for G-MON. 


FOR I=&H7CD@ TO &H7FD1 
READ A: POKE I,A 


DATA 224, 2409225, 209,193;241 217; 8 225,209 197 241° 237: 
123,7,125,42,255,124,233,245,213,205,73,0,209,241,237, 


DATA. 29 .12397.295 44974921 3,229,8, 217,245,197, 213,229,221, 
229,253,229,217,8,237,123,7,125,205,201,1,33,28,125,17, 


DATA 3,6,4,205,43,125,26,2805,49,125,19,26,205,49,125,19, 
205,39,125,126,205,62,125,43,126,205,62,125,43,16,228,205 
v 


DATA. 43)123,13,325220,237,91;, 59125 733,11, 425)1,35,;07257)200, 
195,146,127,205,39,125,33,6,125, 205,126,125, 265;29,125 
i] 


DATA: 254 566, 194,.346,127,, 42,5,,125,17714125,1,3;0,23ts1 10, 


12 T=T+A 

13 NEXT ILLS; 7,125, 49 

14 PRINT "Data checksum =";T 49 ! 

15 END 41 

16! 

17 DATA 195,130,127, 71,45,77,111,110, 32,49,46,49,0,65, 70, 221}124,14 

e 66,67,68,69, 72, 76,97,102,98,99,180,101,104,108,73,88,73 = : 

19 DATA 89,83,80,66,80,0,0,0,0,0,71,208,124,209,127,8,112, 
205,208,124,0,0,0,8,192,0,08,0,0,0,0,9 44 

20 ' 45 

21 DATA 6,0,0,0,0,0,68,0,0,0,0,0,81,213,205,73,0,209,201, 
62,42,;24,18,62,58,24,6;62513,24,2,62 46 

223 47 

23 DATA 32,245,213,205,51,0,209,241,201,124,205,62,125,125, 


245,2360,2480,15,15,15,15,205,75,125,241,236,15,245,254,10, 48 
56 2 49 
a4" 
25 DATA 198,7,198,48,205,49,125,241,201,254,48,216,254,58,56, 50 
‘ 94254,65,216,254,71,48,5,214,7, 214,48, 201,55, 201, 205,29 : 
2 5 
27 DATA 125,205,89,125,56,248,24,211,205,89,125,216,24,205, 


205,129,125,205,110,125,7,7,7,7,79,205,116,125,129,119, 
43,201 
' 


DATA 205,126,125,205,47,125,16,248,201,205,39,125,205,126, 


125,42,255,124,205,43,125,205,57,125,2805,39,125,126,205, 54 
62,125,205 55 
ae 
31 DATA 47,125,205,29,125,254,10,40,34,254,91,40,33,254,88, 56 
202,146,127,205,129,125,56,235,7,7,7,7,71,205,29,125,254 - a5 
' 


DATA 88,202,146,127,205,120,125,56,243,128,119,35,24,196, 
205,35,125,43,24,198,205,39,125,6,1,205,144,125,205,261, 
1,42 

' 


DATA 255,124,30,128,14,2,205,57,125,205,39,125,6,8,126, 
205,62,125,265,47,125,35,29,202,149,127,16,242,205,43, 
725,143 

' 


DATA 32,228,205,43,125,24,221,205,39,125,205,126,125,265, 
29,125,254,74,194,146,127,237,115,7,125,49,9,125,217,8, 
253,225 
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43,58,4,125,167,486,12,151,50,4,125,17,68,126,205, 35 
' 


DATA 125, 24,3,17,75,126,114,43,115,43,54,195,205,43,125, 
62,74,205,49,125,33,0,125,195,23,126,50,4,125,205, 35,125 


DATA 195,146,127,205,39,125,6,3,205,144,125,205,29,125, 
205,49,125,119,205,29,125,254,87,194,146,127,205,35,125, 
205,63,2 

t 


DATA 221,33,250,124,42,253,124,237,91,255,124,237,82,35, 
62,1602,205,31,2,62,85 ,205, 31,2,6,6,221,126,8,,205,31,2 
i] 


DATA 221,43,16,246,37,250,70,127,62,60,205,31,2,151,205, 
31,2,205,106,127,24,238,151,189,40,12,62,60,205,31,2,125 
' 


DATA. 205, 31,.2, 205,106,127, 62,120,205 ,'31,,2,;237,75;251,124; 
124,263 3% 72,120, 205731, 2,195,146 5127,713,123,;205,31 2,122 
' 


DATA. 205 ,,.3142,131,79,26,205,31.2,129, 79 ):19,16,247,i21, 
195,31,2,205,201,1,49,0,192,33,211,124,205,167,49,151,59 
' 


DATA 4,125,205, 43,125,33,0,125,62,36,205,49,125,205,29, 
L220 0 S97 £4 2947 OO pate 228, 1295 254;7 1.282, 1537125,254,5 
66,202 

' 


DATA 164,126,254,74,202,23,126,254,80,202,234,126,254,82, 
202,.75,126,254,87, 202, 243,126,254,83, 202,25, 26;62,8;.205, 
49,125,24,195 











OFFICIAL BBC 
COMPUTER 
DEALER 


RR HORT RPE UT PEL LL RV IO 
MODEL A AVAILABLE 
£299 inc. VAT * 
This is the best microcomputer currently on the m 
modes of operation, full colour, full-size keyboard. internal expansions such as 
disc interface. speech synthesizer, Econet interface. — In short. it is a personal 
computer capable of expanding into a small business system. 

BBC Microcomputer ModelB........... .. £348 + VAT = £399.00 
BBC Mod B + disk interface £409 + VAT = £469.00 
£389 + VAT = £447.35 
£450 + VAT = £517.50 




















BBC Mod B + disk and Econet interfaces.................... 
BBC 100K disk drive ....0.0.0.0...0 oe. . £230 + VAT = £264.00 
BBC dual 800K disk drive £699 + VAT = £803.85 
Torch Z80 disk pack including Z80 2nd processor, 64K RAM and CPN operating 
system + free perfect software ............. £699 + VAT = £803.85 























BBC Teletext receiver (Aug) ...............000..000cecee. £196 + VAT — £225.40 
BBC cassette recorder and lead .......0.........00. cee. . £26 + VAT -— £29.90 
Disk interface kit (free fitting) 0.00.0, £86 + VAT = £96.60 
Mod Ato Mod B upgrade kit 2... cee, £50 + VAT = £57.50 
Fitting charge for AtoBupgradekit..... ........ £20 + VAT— £23.00 
16K memory upgrade kit.........0..... £20 + VAT— £23.00 
Games paddles. £11 + VAT— £12.65 
12” Monochrome monitor incl. cable £89 + VAT = £102.35 
16” Colour monitor incl. cable. £239 + VAT = £274.85 
User guide. £10 + VAT— £10.00 
Econet interface (tree fitting)... £60 + VAT.- £69.00 
Speech intertace (free fitting) £47 + VAT— £54.05 
BBC disk manual + formating disk . £30 + VAT — £34.50 
Parallel printer cable ................. £10 + VAT — £11.50 
BBC word processor (view) .................. £52 + VAT — £59.80 
BBC Fourth language cassette... £15 + VAT— £17.25 
BBC Lisp language cassette... £15 + VAT— £17.25 








100% BBC COMPATIBLE MITSUBISHI 
AND TEAC SLIMLINE DISK DRIVES 




























These drives are Su, ied ready cased with all the necessary cables. formating 
program and user disk system guide. 

There are some useful utilities included. e.g. Epson Screen Dump Program. 
Memory Dump, Free. Duplicate. Merge and Relocate. Power consumption of 
these drives is very low (0.2A typ. at - 12V,0.4V typ. at - 5V per drive). Power 
1s taken from the BBC computer a: 












Single drive 100K 40 tracks £169 - vaT - £194.35 
Dual drive 200K 40 tracks . _ £329 - VAT — £378.35 
Single drive 400K 80 tracks . £239 - VAT £274.85 
Single drive 400K 40 8¢ ‘racks switchable £259 - VAT — £297.85 
Dual drive 800K 80 tracks £449 - VAT — £516.35 
Dual drive 800K 40 80 tracks switchable £469 - VAT — £539.35 











COMPLETE WORD PROCESSOR 
FOR ONLY £1,099 + VAT 


This package consists of BBC Microcomputer. View. wordprocessor, 400K 
Slimline disc drive, High resolution 12” Green monitor. Juki 6100 18CPS Daisy 
Wheel printer and all the necessary cables and documentation. The above 
package can be supplied with components. of your own choice. e.g. 800K disc 
drive or a different printer. Please phone us for a price for your particular 
requirement 

Special package deal 





£1.099 - VAT — £1,263.85 


PROFESSIONAL MONITORS 




























GREEN MONITORS =e 

12” Green screen monitors with composite and sync. input. Suitable for most 

computers. 

%* 18 MHz band width, high resolution .. 

%* 15 MHz band width, normal resolution 

COLOUR MONITORS 

#* M!CROVITEC RGB input 14 + monitor supplied with RGB lead for BBC 
£209: VAT - £240.35 

%* SANYO SCM 14” Normal res. 14”, 400 dots, RGB input supplied with RGB- 


£89 + VAT — £102.35 
£69 + VAT -— £79.35 











feats easiye ter ere ee Neonat £219 + VAT = £251.85 
* SANYO SCM 14M Medium res. 14”, 600 dots, RGB input supplied with RGB 
EEG POMS ew SPR ai nermne a OREN oc eat eo CRS £199 VAT - £228. 85 


* SANYO SCM 14H High res. 14”, 800 dots, RGB input supolied with RGBigad 
£399+ VAT = £458.85 









DEPT. CT, 28 BURNT MILL, HARLOW, 
ESSEX CM20 2HU 
TEL: HARLOW (0279) 443521 OR 412639 
TELEX: 995801 REF - A18 
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Akhter Instruments Limited 





EPSON FXBE’ BU CONT. THU CPS, Mortal, rane aie eMe Ciidratrers 256 USer 
definable characters, superscript, subscript, 11 x 9 matrix, bi-directional logic 
seeking, hi-res bit image printing (960 x 8 dots/line), friction and pinfeed, 9 
international character sets, Centronic parallel interface. 

FXSO PRICE 0) ic es er i eo ne 
EPSON RX80: 80 column, 100 CPS, normal, italic and elite characters, 11 
international character sets, hi-res bit image printing, bi-directional logic 
seeking, 4” to 10" adjustable pin feed, Centronic parallel interface. 

RX8O.. PRICE 3 csusrncereri as £239 + VAT = £274.85 
EPSON FX 100 136 column, 160 CPS friction and tractor 
feed, up to 15” adjustable carriage, hi-res bit image printing, 
true descenders. PRICE £479 + VAT = £550.85 
RS232 Interface for all above printers £55 + VAT = £63.25 
RX80 FT (friction tractor) £269 + VAT = £309.35 


Tractos fedd {or FNS ke i ae eee a £79 + VAT= £90.85 
Roll holder tor PRGOs sie see hee ee ee £12 + VAT= £13.80 
Ribbon for MX80, FX80. RX80 . £8 +VAT— £9.20 


Ribbon for MX100 $12 + VAT— £13.80 











SEIKOSHA 

DOT MATRIX 
PRINTERS W'TH 
HIGH-RES 
GRAPHICS 


GP-100A 80 column, 50 CPS. dot addressable hi-res graphics, 10” wide, fully 
adjustable, tractor feed. 7 x 5 print matrix, Centronic parallel interface. 

GP-100A 50CPS PRICE £175 + VAT = £201.25 
GP-250X 80 column. 50 CPS. 10” wide. fully adjustable. tractor feed, true 
descenders. 64 user definable characters, double height and’or double width 
printing, 8 x 5 print matrix. Centronic parallel and RS232 (serial) interfaces both 
included. 

GP-250X PRICE .. 

NEW GP-700A 7 COLOUR PRINTER 
This latest addition to Seikosha range gives you print in seven colours, 10” wide 
carriage, friction and tractor feed, 50 CPS print speed, dot addressabe high-res 
graphics, 4 hammer printing mechanism. 10 CPI or 13.3 CPI. special Quite 
printing mode. Centronic parallel interface. 
GP-700A SPECIAL INTRODUCTORY PRICE .... 


£219 « VAT — £251.85 


.. £349 + VAT = £401.35 





GUARANTEED LOWEST PRICES 

We guarantee that our prices are the lowest on the market If you can 
find any item advertised and in stock at less than our price we will 
match that price 


NEW LOW PRICES ON STAR 


The most cost effective quality matrix printers to be launched this year. DP510 
and DP515 features include friction and tractor feed and roll holders as standard. 
100 UPS print speed bi-directional logic seeking 9 x 9 matrix gives true 
descenders. 2.3K buffer as standard hi-res bit image plus block graphics, sub 
aNd super script, italic printing, auto underlining, vertical and horizontal 
tabulation. left and right margins set. skip over perforation, back space and self 
test 

STAR DP510 10” carriage 80 columns 

SPECIAL BINGE csc ti ee sancaiausar tue sh ancee donee 
STAR OP515 15” carriage 136 columns 

SPECIAL PRICE .. seh 


£279 + VAT 
RS232 INTERFACE FOR ABOVE. 


£50 + VAT — £57.50 


POCKET COMPUTERS AND CALCULATORS 


* CASIO PB-100 Basic language pocket compute, 544 program steps, Qwerty 
keyboard, 12 char display . £34.75 + VAT = £39.95 
* CASIO FX-700P Basic language. scientific functions, 1568 program steps, 
Qwerty keyboard, 12 char display £43.44 + VAT = £49.95 
* CASIO PB-300 Basic language computer, scientific functions, 1568 program 
steps, built-in mini printer, Qwerty keyboard, rechargeable batteries and 





ChaNOel 12 Chat OISPldye:., we ee £78.22 + VAT= £89.95 
* CASIO FA-3 Cassette adaptor for PB100, PB300, FX700 . 
UUINSTURCAU LS 2 alc arie VS ARR GIR NSH Ret Na £17.35 + VAT = £19.95 


* CASIO FP-12 Printer for BB100 andFX700 ......... . £39.09 + VAT= £44.95 

* SHARP PC-1211 Basic language computer, scientific functions, 1424 program 
ste ps, 24 char display, Qwerty keyboard 

£60.83 + VAT = £69.95 

* SHARP PC-1251 Basic language computer, 4K RAM, 24K system ROM, 24 char 
display, Qwerty keyboard, user defined key, numeric pad 

£69.52 + VAT = £79.95 

* SHARP CE-125 Cassette recorder and mini printer for use with PC-1251, incl 
Dattcharders. se a ere eo pea £86.91 + VAT = £99.95 

%* SPECIAL PRICE PC-1251 + CE-125.....0.000200.... £146.95 + VAT = £169.00 








ORDERING INFORMATION 


orders, please phone or write to check shipping cost. 


OPENING HOURS: MON-FRI 9am-5.30pm, SAT 10am-2pm. 
We welcome callers, no D parking problems. 





£349 + VAT =£401.35 











£239 + VAT £274.85 
-£320.85 





All orders which accompany a cheque, cash or postal orders are CARRIAGE 
FREE (UK only). Please make cheques and postal orders payable to "AKHTER 
INSTRUMENTS". A carriage charge of 3% of invoice total is applicable to 
BARCLAYCARD and ACCESS orders. We accept official orders from 
Government and Educational establishments. We accept VAT FREE EXPORT 








TEXAS INSTRUMENTSTI 99/4A 


EAA 

































This microcumputer is based on TMS9900 16-bit microprocessor. It includes 
16K RAM, 16 colour high resolution graphic (192 x 256). The screen display is 
32 characters, 24 lines TI-BASIC. Full-size keyboard. For Software there are 
about 1000 programs to choose from. There are a lot of peripherals available, 
e.g. Disk Drives, Disk Interface, Speech Synthesizer, Extra RAM. Additional 
Language (PASCAL, TI-LOGO, ASSEMBLER). 























TI HOME COMPUTER HARDWARE 

Title Description Price 
inc VAT 

T199/4A Complete with UHF modulator and power 













































































oT ER RA ns aS aA Ahi £89.95 
PERIPHERALS 
Speech When used with selected modules will 
Synthesizer roduce electronic speech ..................... £41.95 
Peripheral This unit takes all card peripherals and on 
Expansion System internal disk drives 2000 42 ao £79.95 
Disk Drive - 92K formatted drive, mounts internally in 
internal peripheral expansion system ................ £149.95 
Disk Controller Controls up to 3 disk drives, complete with 
Card disk manager command module ».......... £109.95 
Disk Drive 92K formatted capacity per side acts as 2 
Double Sided drives DSK1 & DSK2 total capacity 184K 

DyROG eat een Cae es £219.95 
Disk Drive Complete with own case, power supply & 
External connecting.cables see oe £259.95 
RS232 Provides 2 serial RS232 ports, and one 
Expansion Card parallel port for intertacing................-.. £79.95 
RAM Adds 32K bytes extra RAM bringing total 
Expansion Card capacity to 48K bytes .................0cee. £79.95 
P-Code Card Includes the UCSD-PASCAL P-code inter- £189.95 

(Re eee ca tl tee SUR ne Ree 
Matrix Printer 80 column matrix printer pinter GP-100A 

SY e101 (Pepe lice eg UR I Phy MOS ol GR Br a ce £219.95 
Matrix Printer 80 column matrix printer with RS232 and 
GP250X Centronic parallel interface ................... £273.95 
Epson RX80 80 column, 100 CPS matrix printer.......... £297.85 
Printer 



















Please send S.A.E. for software prices 


THE AFFORDABLE DAISYWHEEL 
PRINTER 


ONLY 
£369 
+ VAT 




































w& 18 CPS - Bi-Directional Logic Seeking 
% 10, 12,15 CPI + Proportional Spacing 
¥% “Drop in” Daisywheei — Triumph Adler Compatible 
% Supports all Wordstar features 

% Diablo protocols —- IBM Selectric ribbon 

%& 2K Buffer a$ standard — 100 character Daisywheel 


SPECIAL OFFER JUKI 6100 DAISYWHEEL ........... 

























we 80 CPS - 
Bi-Directional 
Logic Seeking 80 Column. — 
% Friction and Adjustble Tractor Feed 
% Patented Square Needles up to 9 x 13 matrix 
% Hi-Res Graphics and Block Grphics 












SHINWA CP80 PRINTER ....:....... Sis ee RN £219 + VAT = £251.85 
SPARE-RIBBON FOR GPBO:: iiib nu oe ar es oe £5+VAT= £8.78 










































THE NEW SHARP MZ 711 
COLOUR COMPUTER 


64K user memory — 4K video memory 

screen. Construction 40 x 25. Internal 

optional cassette and printer. 

Special introduction price £199 + VAT 
£228.85 (free 10 games included) 


Internal cassette recorder option £33 + VAT = 
£37.95 


Internal 4 colour printer plotter option 
£109 + VAT = £125.35 
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PART 4 


ast month | dealt with the 
structures that FORTH uses to 
ontrol the flow of execution 
within a program and also began to 
explain how various dictionary 
entries are stored and how you can 
create your own ‘defining words. 
We'll now see how we can use 
—DuUILDS ... DOES to-proguce a 
word which can define an array. For 
the first example we want a word 
ARRAY which, when used as follows: 


n ARRAY name 


will set up a dictionary entry called 
‘name’ which will be an entry of n+] 
elements (0 to n), so that when 
‘name’ is used, for example: 


m name 


it will return the memory address of 
the mth element of the array. (I'm 
using arrays with subscripts O to n as 
this will be familiar to most BASIC 
uUSEIS. ) 

If this all sounds a little confusing 
then the idea compares to the use of 
BASIC’s DIM function, comprising 
DIM name (n) which sets up the 
amay, and name (n) which lets you 
access any element of the array. So 
we need a word whose actions are: 
(define-time action) Allocate 
space in the dictionary for the array. 
(run-time action) Given a num- 
ber, m, on the stack, return the 
physical address of the mth ele- 
ment of the array. 

Listing 1 gives a definition for the 
word ARRAY which will do what I 
have described. It could be used, for 
example, as: 


TAKE IN CRA 


This would set up an array called 
COUNTERS with 21 elements (0-20). 
Using: 

1@ COUNTERS 


would give the address of element 
10, so that: 


19 COUNTERS @ 


would return the number held in this 
element of the array, and: 


14 18 COUNTERS ! 


would store the number 14 in element 
10 of the array. 

The way the define-time action of 
the word works is as follows. <BUILDS 
sets up the dictionary header for the 
new word, the expression 


Pas 2 ¥ALLOT adds-one to 


LEARNING FORTH 


the number on top of the stack, mul- 
tiplies the result by two and sets 
aside (ALLOTs) that many ‘bytes’ of 
memory in the dictionary for the 
parameter field of the new word. 
Remember, given a number n, we 
want n+1 elements which take up 
2*(n+1) bytes of memory as each 
number takes two bytes. 

ALLOT works in much the same 
way thatC, and , canbe usedto 
enclose one and two bytes of memory 
in the dictionary but ALLOT can set 
aside as many as necessary and also 
does not store any numbers in these 
bytes, it just makes the space 
available. 

The way the run-time action 
works is quite simple. Assuming you 
have used your new array to store 
some numbers, then whenever you 
want to access the array (ie get a 
number from it or put a number in it) 
you use an expression like 


7 COUNTERS 


The word COUNTERS leaves the 
address of its parameter field (the 
actual array space) on the stack and 
calls the run-time action of its 
defining word ARRAY to use this 
number. The expression in ARRAY: 


SWAB: 2s %i + 


calculates the address of that par- 
ticular element of the array. 

As this is the first example I'll run 
through this run-time action bit by 
bit. When the run-time action of 
ARRAY is called there are two num- 
bers on the stack (these are the 
required element (10) and the 
address of the zeroth element of the 
array (COUNTERS)). 

The expression SWAP 2 * 
leaves on the stack (address of the 
zeroth element) and (offset in bytes to 
required element). Then + leaves on 
the stack the actual address of the 





~~ 


48K SPECTRUM ABERSOFT fig-FORTH 1. 1A) 
: ARRAY <BUILDS ( N -) 

14+2.* ALLOT 

DOES> ( N,ADDR-ADDR) 

SWAP 2 * + ; 


Oo 8s Gren Geto O 


Listing 1 
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required element, which can be 
used by @ and! to fetch a value 
stored or to store a new one. 

The word ARRAY can be used to 
define any number of unique arrays 
with any number of elements 
(memory permitting) in the same way 
that VARIABLE can create lots of dif 


ferent variables. 


CHECKING IT OUT 


While the definition of ARRAY may 
seem particularly short for such a 
powertul command, it does have 
serious drawbacks. When a new 
array is defined it does not initialise 
the contents: more seriously, when 
the array is used there is no error- 
checking to see if what you are trying 
to do is ‘legal. 

For example in Spectrum BASIC, 
if you set up an array using: 


DIM p(1@) 
and then try: 


LET a = p(12) 


the program will stop with a “Bad 
subscript” error message. 

It is very important to make sure 
that you stay within the limits of your 
array, because if you change the 
contents of a memory address just 
outside it, you will corrupt the dic- 
tionary entry of an adjacent word. 
This usually means that sooner or 
later your program will ‘crash’ 
seriously. Listings 2 and 3 give 
definitions for a few words that over- 
come these difficulties. 

The new defining word 
ARRAYCHECK in Listing 3 is a word 
which will set up arrays in the dic- 
tionary but will initialise all the ele- 
ments of the array to zero at 
define-time, and at run-time will 
check that you are attempting to 
access a valid element. 

To explain, at define time the 
define-time action takes a number off 
the stack (call it n) and adds one to 
it; this is the number of elements. This 
number is duplicated and stored in 
the first two bytes of the parameter 
field. The same number is then used 
to control the upper limit of aDO... 
LOOP which repeatedly encloses 
the number O in the dictionary by 


LISTING 1 - DEFINING WORD FOR ONE DIMENSIONAL ARRAYS) 


(Nee a PITTED AER IN EEE IE TDI SHDN RT IAG EARLE AS HGRA RL NEE EON IIL RPI LODE TOT DERN IN SELLER LL ET ES STORE OLEATE DLLME REE A! 
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using , (comma). For example, if 
we set up an array using: 


3 ARRAYCHECK TEST 


then the define-time action of 
ARRAYCHECK would set up a dic- 
tionary entry like the one shown in 
Fig. 1. The first two bytes in the 
parameter field contain the number 
of elements in the whole array and 
the rest of the parameter field is 
initialised to contain zeros. 

Error-checking, of course, makes 
the run-time action of ARRAYCHECK 
a little more complicated, so I have 
defined two words CHECKBOUND 
and ERRORMESSAGE to make the 
definition of ARRAYCHECK clearer. 
Whenever our new array TEST is 
used, it calls the run-time action of 
ARRAYCHECK. At this time the top 
two numbers on the stack will be the 
element of TEST we require and the 
address of TEST’s parameter field. 

CHECKBOUND uses these two 
numbers to fetch the contents of the 
first two bytes of this parameter field. 
This contains the number of elements 
in the array or, to put it another way, 
the upper limit plus one. CHECK- 
BOUND returns a value to the top of 
the stack which is one, ie true, if the 
required element is (greater than or 
equal to zero) AND (less than or 
equal to the upper limit). 

If CHECKBOUND retums ‘true’ 
then ARRAYCHECK carries on and 
works out the address of the required 
element of the array as before. (The 
2 + is to take into account the two 
bytes taken up to hold the count for 
the number of elements.) 

If CHECKBOUND retums ‘false’ 
then ERRORMESSAGE is called, 
which uses the top two numbers on 
the stack (ie required element, 
parameter field address) to produce a 
suitably useful message. Execution 
of any program running is then 
stopped. Most programs in FORTH 
would probably use ABORT to abort 
the program and clear the stack, but 
in Abersoft's version ABORT also 
clears the screen so that your error 
message would promptly disappear. 
So I have used the expression SP! 
QUIT to clear the data stack and 
quit execution of the current 
program. 

To see how this works in practice, 
try: 


3 ARRAYCHECK TEST 


and then attempt to use an element 
that is out of bounds, for example: 


CRA 15 


The computer will respond: 


ERROR! Value 6 out of bounds 
Range allowed is 6-3 
ok 


Clever, eh? 
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2-D ARRAYS 


Listing 4 gives the definition of a 
word that will create two dimensional 
arrays (ie rows and columns). This 
definition is a non-checking, non- 
initialising one. At first sight this 
definition of 2-D seems more com- 
plex than that of ARRAY, but it is 
essentially the same. The word 2-D is 
used in the form: 
column-limit 2-D 


row-limit name 


For example: 


8 8 2-D CHESSBOARD 
Any element of the array would be 
accessed using: 


row column name 


For example: 


4 2  CHESSBOARD 

The define-time action of 2-D first of 
all has to save in the parameter field 
of the new word the number of 
columns in the array. Then the total 
number of bytes which the array will 
occupy is calculated: 


number of bytes = 2¥*((limit for 
rows + 1)¥*(limit for columns + 1)) 


and these are set aside in the dic- 
tionary using ALLOT as defined 
earlier. 

The run-time action of 2-D 
expects three numbers on the stack 
(row, column, parameter field 
address of new array), and it calcu- 
lates the address of the required ele- 
ment. All the elements of the array 
are stored in order in the dictionary; 
for example, if we had defined an 
array using: 

2 3 2-D EXAMPLE 
the elements would be stored in the 
dictionary in the following order: 


(0,9),(0,1),(8,2),(0,3),(1,9), 
(1,1), e822) 


so that to calculate where the 
required element is in the list you 
work out: 


((required row)*(number of 
columns) + required column 


HEADER 


ARRAYCHECK 


RUN-TIME CODE 


Fig. 1 A typical ARRAYCHECK 
dictionary entry. 


For example, in the above 2-D array 
element (1,1) is: 
(1*4) + 1 = 5th element 


Remember our list begins with the 
zeroth element, so the offset in bytes 
from the parameter field address is in 
this case (2% 5) plus the two 

bytes used to store the number of 
columns. 

I have included in all my detini- 
tions comments at the right hand 
side to indicate the contents of the 
stack at various points. 

Listing 5 gives a defining word 
2-DCHECK which operates similarly 
to 2-D, but initialises the elements of 
the array to zero when the array is 
defined and at run time checks that 
both subscripts (row and column) are 
within the limits of the array. 

In this case the define-time actior 
of 2-DCHECK needs to store in the 
parameter field of the new word both 
the number of rows and the number 
of columns in the array. The run-time 
action of 2- DCHECK is essentially 
similar to that of ARRAYCHECK, but 
in this case we need to check for 
both row and column limits. Figure 2 
gives a diagrammatic view of the 
dictionary entry for a word defined 
as: 


3. 4 2-DCHECK -BOARD2 


This array has (3 + 1) ® (4+ 1) = 
20 elements, and the number of 
columns and the number of rows are 
stored as the first two numbers (four 
bytes) in the parameter field of 
BOARD2. 

So, the nin-time action of © 
2-DCHECK uses the numbers pro- 
vided for the required row and 
column, along with the parameter 
field address of the array, as 
parameters to pass to 
CHECKBOUND to see if the sub- 
scripts are in range. If either subscript 
is wrong then a suitable error 
message is printed as before, only 
this time I have arranged that 
2-DCHECK lets you know whether 


the mistake is in the row or column. 


HERE BE MONSTERS 


Listings 6 and 7 show how flexible 
the use of defining words is in con- 
structing your own dictionary entries. 
This example sets up & somewhat 
larger and peculiar array for holding 


PARAMETER FIELD 
"OF 


NUMBER OF ELEMENTS IN ARRAY 
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0 ( {LISTING 2 - ASSOCIATED WORDS FOR SELF CHECKING ARRAYS) 0 ( LISTING 4 - DEFINING WORD FOR 2-D NON-CHECKING ARRAYS) 
1 ( 48K SPECTRUM ABERSOFT fig-FORTH 1. 1A) 1 ( 48K SPECTRUM ABERSOFT fig-FORTH 1. 1A) 
2 2 
3: CHECKBOUND ( N,ADDR-N,ADDR,FLAG ) 3 : 2-D <BUILDS ( NUM. OF ROWS,NUM. OF COLS -) 
4 OVER OVER @ ( N,ADDR,N,UL+1) 4 1+ DUP , SWAP 1+ * 2 * ALLOT 
' 5) .OVER:> ( N,ADDR,N, [UL+1>N} ) 5 DOES> ( ROW,COL,ADDR-ADDR) 
6 SWAP -1 > ( N,ADDR, [UL+1>N], [UL>=0]) 6 ROT OVER @ ( COL,ADDR,ROW,NO.OF COLS) 
4 AND ( N,ADDR,FLAG[FLAG=1 IF VALID ELEMENT ] ) ai FIROD ck ( ADDR, ELEMENT) 
B35 8 2'* + 2+ ( ADDR) 
9 SA 
10 : ERRORMESSAGE ( N,ADDR-) 10 
11 CR SWAP ." ERROR! Value " . ." out of bounds." ‘1 
12 CR ." Range allowed is 0-" @ 1- .CR 12 
shes ere ‘3 
aa 14 
; 15 15 
\ Listing 2 : Listing 4 


LISTING 3 - DEFINING WORD FOR SELF CHECKING 1-D ARRAYS ) 


( LISTING 5 - DEFINING WORD FOR 2-D SELF CHECKING ARRAYS ) 
48K SPECTRUM ABERSOFT fig-FORTH 1. 1A) 


( 48K SPECTRUM ABERSOFT fig-FORTH 1. 1A) 


—_ nN 


0 0 
1 1 
2 2 
3 : ARRAYCHECK <BUILDS ( N-) 3: 2-DCHECK <BUILDS ( NUM.OF ROWS , NUM.OF COLUMNS ) 
4 1+ DOP. .4 -O:BO-'9 1.2) LOOP 4 1+ DUP , SWAP 1+ DUP , ( COLS+1,ROWS+1) 
5 DOES> ( N,ADDR-ADDR ) 3 = 0: DO 65 LOOP 
6 CHECKBOUND IF*SWAP 2 * + 2+ ( ADDR) 6 DOES> ( ROW,COL,ADDR-ADDR ) 
is oF; 
8 8 


ELSE ERRORMESSAGE SP! QUIT THEN ; CHECKBOUND ( CHECKS IF COL IN RANGE ) 

IF ROT SWAP 2+ ( COL,ROW,ADDR+2) 
2 9 CHECKBOUND ( CHECKS IF ROW IN RANGE) 
( 
( 


10 10 LE 2 1 -SDuUP =e COL,ROW,ADDR,NO.OF COLS) 


14 ea ROT. * ROT +.2 * + 4 + ADDR OF REQUIRED ELEMENT ) 
iS 12 ELSE ERRORMESSAGE ." for row of array." SP! QUIT 
43 13 THEN 
14 14 ELSE ERRORMESSAGE ." for column of array." SP! QUIT 
15 15 THEN ; 
| Listing 3 Listing 5 
th 


ine names and attributes of 19 dit- 
ferent monsters that wish to do battle 
with you in my FORTH version of that 
famous game THE-VALLEY. 

While the details of the defining 
word MARRAY will not be clear until 


the end of this series of articles (as it 


HEADER PARAMETER FIELD 


: 2 : ; ELEMENT (3,4 
relies heavily on moving strings of Se * Gn 
text about betore it encloses them in damerien 
the dictionary) the general idea is ecergaes ELEMENT (1,3) 
quite instructive. The defining word ELEMENT (0,4) 
MARRAY has a define-time action vic atacarats 
__ THE SPACE BETWEEN TWO VERTICAL BARS,I_ | ELEMENT (0.1) 
which requlres no values upon the REPRESENTS TWO BYTES OF THE DICTIONARY. ; 


stack, but instead prompts the user to ELEMENT (0,1) 


type in the details for the four dif- 
ferent fields of this array. When used 
as: i 


Fig. 2 A typical 2-DCHECK 
dictionary entry. 





MARRAY MONSTERS 


The run-time action of the word time action returns either the 
you can type in repeatedly the MARRAY takes two numbers off the required address for MSTRENGTH, 
names, physical strenths and psi stack (required element (0-18), _ MPSI and MCODE or an address 
strengths of yourmonsters along with required field (0-3)), for example: and a number for MNAME (address 
a code letter which determines the of first letter of monster's name and a 
scenes that a particular nasty crea- 4 MNAME MONSTERS count of the number of letters in its 
ture can be present in. All this infor- name). This allows the name to be 
i. mation is thus stored in the array where we have defined MNAME, printed using the FORTH word TYPE. 
7 MONSTERS which is set up to con- MSTRENGTH etc as constants to Next month I shall be dealing 
tain (diagrammatically): make the program clearer. The run- with input and output, which should 
clarify the details of this defining 
named strength@ psi-strength@ code-letterg@ word and allow us to produce some- 
(15 letters max) (6-255) (9-255) (1 letter) 


thing like it for names and addresses 
namel strengthl psi-strengthl code-letterl dates of birth and so on. 


name2 strength2 psi-strength2 code-letter2 A RAN DOM WALK 


It is quite difficult in such a series as 
: ; this to provide numerous small 
examples to show the use of a par- 
ticular feature of a language, so the 
namel8 strengthl8 psi-strengthl8 code-letterl8 next few listings demonstrate, using 
fairly complex but nicely compatible 


: 3 LEE NL ATL TENE a 
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Series: Teach yourself FORTH 


eee ce 


programs, many of the aspects of 
FORTH that I have covered so far. 

Listing 8 is a few words to provide 
a random number generator, which 
is missing from FORTH. The 
generator uses the same method as 
the built-in RND function on the 
Spectrum, and the mathematical 
method is described fully on pages 
56 and 57 of the manual. To use the 
random function type: 


n RND 


where n is a positive integer, and a 
random number between zero and 
n—1 will be retumed to the stack. 
Like the BASIC version you can 
repeat a given series of random 
numbers by using: 


n RAND 


This initialises the seed for the 
generator. 

One particular feature of RAND is 
that if you type: 


RAND 32 


the program uses the Spectrum clock 
to initialise the seed. 
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Listings 9-12 use a 2-dimensional 
array to hold an array of characters 
which represent a maze. The method 
of construction of the maze and the 
functional definitions of all the 
associated words are given in the 
glossary, Listings 13 and 14. Execut- 
ing TEST will produce the maze 
shown in Fig. 3. Change 1 RAND 





to 0 RAND and TEST will produce a 
different maze each time. 

Listings 16-18 use the maze pro- 
duced by TEST to show how, from 
any position within the maze, an exit 
can be found (providing one exists). 
The method is recursive, ie the word 
SEEKEXIT actually contains a call of 
itself and this necessitates, in Aber- 
soft's FORTH, the use of the word 
PGSMUDGE, as explained in the 
glossary. Again the method used to 
find the exit and the functional 
definitions of the associated words 
are contained in the glossary, List- 
ings 19 and 20. 

If you execute TEST (with 1 RAND 
in the definition as shown), followed 
by FINDEXIT, then the output should 
be as shown in Fig. 3. 

I hope this month's article has 
whetted your appetite for a little 
more FORTH, as next month I'll be 
explaining how you can communi- 
cate with your program (ie input/ 
output), how FORTH handles the 
RAM disc, and how you can com- 
bine this with what we know of defin- 
ing words to manipulate and store 
text within the dictionary. 


0 ( LISTING 6 - DEFINING WORDS FOR 'MONSTER ARRAY' ) 0 ( LISTING 9 - WORDS FOR MAZE DRAWING) 

1 ( 48K SPECTRUM  ABERSOFT fig-FORTH 1. 1A) 1 ( 48K SPECTRUM ABERSOFT fig-FORTH 1. 1A) 

2 0 CONSTANT MNAME 1 CONSTANT MSTRENGTH 2 : VAR VARIABLE ; : CON CONSTANT ; ( MAKES TYPING EASIER ) 
3 2 CONSTANT MPSI 3 CONSTANT MCODE 3 31 VAR SCREEN-WIDTH 20 VAR SCREEN-HEIGHT 2 VAR WALLSIZE 

4 : MARRAY <BUILDS 4 0 VAR MAXROW 0 VAR MAXCOL 0 VAR LINES 

5 19 0 DO 5 : SETPARAMS ( -) 

6 CLS ." TYPE IN NAME OF MONSTER" CR 6 WALLSIZE @ SCREEN-WIDTH @ OVER / * MAXCOL ! 

ii QUERY 34 ( ASCII " ) TEXT PAD DUP 15 + SWAP 7 WALLSIZE @ SCREEN-HEIGHT @ OVER / * MAXROW ! 

8 DO I. C@ C, LOOP 8  MAXROW @ MAXCOL @ * WALLSIZE @ DUP * / 100 * 127 / LINES ! ; 
9 CR ." TYPE IN MONSTER'S STRENGTH" CR QUERY INTERPRET C, 9 72 ( ASCII H) CONSTANT HEDGE 46 ( ASCII .) CONSTANT WALKWAY 
10 CR ." TYPE IN MONSTER'S PSI STRENGTH" CR QUERY INTERPRET C, 10 0 VAR ROW-START 0 VAR COL-START 0 VAR ROW-DIR 

"i CR ." TYPE IN CODE FOR SCENE SELECTION" CR KEY DUP EMIT C, 11 0 VAR COL~DIR 0 VAR END-ROW Q VAR END-COL 
12 LOOP 12 SETPARAMS ( SETS VALUES FOR MAXROW & MAXCOL) 

13° DORS> ( ELEMENT,FIELD,BASE ADDRESS) 13 MAXROW @ MAXCOL @ 2-DCHECK MAZE . ( SETS UP ARRAY SPACE) 


14 OVER DUP MNAME = OVER MSTRENGTH = OR 
ibe. OVER MPSI = OR SWAP MCODE = OR NOT ~-~-> 


Listing 6 


( LISTING 7 - MONSTER ARRAY CONTINUED) 
( 48K SPECTRUM ABERSOFT fig-FORTH 1. 1A) 


IF CR ." ERROR! INVALID FIELD SUPPLIED" CR SP! QUIT THEN 


( ELEMENT,FIELD,BASE ADDR. ) 


14 : CPLOT ( ASCII CODE,ROW,COL) 
13 OVER OVER AT ROT DUP EMIT ROT ROT MAZE ! ; 


Listing 9 


0 ( LISTING 10 - MAZE DRAWING CONTINUED) 
1 ( 48K SPECTRUM ABERSOFT fig-FORTH 1. 1A) 
: CPOINT ( ROW,COL-ASCII CODE) MAZE G3 


: PICKSTART WALLSIZE @ MAXCOL @ OVER / 1+ RND * COL-START ! 


WALLSIZE @ MAXROW @ OVER / 1+ RND * ROW-START ! ; 


0 
1 
2 
3 
4 ( CALCULATE OFFSET FOR CHOSEN FIELD ) 
5 
6 
7 
8 


2 
3 
o 
5 : PICKDIRECTION 4 RND 1+ CASE 
6 
7 
8 


ENDOF 





OVER ( E,F,BA,F) 1 OF 1 COL-DIR ! 0 ROW-DIR ! 
CASE MSTRENGTH OF 15 + ENDOF 2 OF -1 COL-DIR ! 0 ROW-DIR ! ENDOF 
MPSI OF 16 + ENDOF 3 OF 0 COL-DIR ! 1 ROW-DIR ! ENDOF 
g MCODE OF 17 + ENDOF 9 4 0F 0 COL-DIR ! -1 ROW-DIR ! ENDOF 
10 ENDCASE ( E,F,OFFSET BASE ADDR.) 10 ENDCASE ; 
11. ROT ( F,OBA,E) DUP 18 > OVER 0< OR 11: FINDEND WALLSIZE @ COL=DIR @ * COL-START @ + END-COL ! 
12. IF CR ." ERROR! OUT OF BOUNDS IN MARRAY" SP! QUIT THEN 12 WALLSIZE @ ROW-DIR @ * ROW-START @ + END-ROW ! ; 
13. 18 * + ( F,ELEMENT ADDR) 13 : CHECKEND ( -FLAG) END-COL @ 0< 
14 SWAP MNAME = IF COUNT ELSE C@ THEN 14 MAXCOL @ END-COL @ < OR END-ROW @ 0< OR MAXROW @ END-ROW @ < 
my 15 OR IF 1 ELSE END-ROW @ END-COL @ CPOINT HEDGE = THEN ; 
Listing 7 Listing 10 
k 
t 
0 ( LISTING 8 - RANDOM NUMBER GENERATOR) 0 ( LISTING 11 - MAZE DRAWING CONTINUED) | 
1 ( 48K SPECTRUM  ABERSOFT fig-FORTH 1. 1A) 1 ( 48K SPECTRUM ABERSOFT fig-FORTH 1. 1A) . 
> 2 : PLOTLINE HEDGE ROW-START @ COL-START @ CPLOT WALLSIZE @ 0 DO . 
le Gant Aue eb) BERD 3. ROW-START @ ROW-DIR @ + ROW-START ! . 
4 4  COL-START @ COL-DIR @ + COL-START ! | 
5S : SEEDON ( -NEXT VALUE OF SEED) etiete ROW-START @ COL-START @ CPLOT . 
6 SEED @ 75 U* 75 0 D+ OVER OVER U< - - 1 - DUP SEED ! ; 3 : 
yh, : 
| 8 : TRYLINES ( FLAG-FLAG) 
8 : RAND AL R - | 
9 DUP é e eee Sa si DROP THEN SEED ! ; 9°) GEGEN DUP Ge Te RECRP TARE “TREN BRON 0: ’? . 
ne a bee 10 DO PICKDIRECTION ‘FINDEND CHECKEND 0= 
11 IF PLOTLINE DROP 1 LEAVE THEN 
11: RND ( N-PSEUDO RANDOM NUMBER BETWEEN 0 AND N-1 ) epi eli 
: 
PERNT Oe en 13. INKEY 32 = IF DROP 2 THEN DUP | 
a 14 UNTIL ; ; 
15 
15 2 LOAD 3 LOAD 4 LOAD 5 LOAD 8 LOAD 9 LOAD | 
Listing 8 Listing 11 
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LISTING 12 - MAZE DRAWING CONTINUED) 
48K SPECTRUM ABERSOFT fig-FORTH, 1. 1A) 


0 
1 
2 
3: DRAWMAZE 

4 0 LINES @ 0 DO TRYLINES DUP 2 = IF LEAVE THEN LOOP DROP ; 
5 

6 

7 

8 


DRAWBORDER 

MAXROW @ 1+ 0 DO HEDGE I 0 CPLOT HEDGE I MAXCOL @ CPLOT LOOP 

MAXCOL @ 1 DO HEDGE 0 I CPLOT HEDGE MAXROW @ I CPLOT LOOP 
9 MAXCOL @ 1 DO MAXROW @ 1 DO WALKWAY I J CPLOT LOOP LOOP ; 


11 : DISPLAYMAZE 
12 CLS MAXROW @ 1+ 0 DO MAXCOL @ 1+ 0 DO 
13 J I MAZE @ EMIT LOOP CR LOOP ; 


15 : TEST CLS 1 RAND DRAWBORDER DRAWMAZE 20 O AT ; 


Listing 12 


0 ( LISTING 13 - MAZE DRAWING EXPLANATION) 

1 ( 48K SPECTRUM ABERSOFT fig-FORTH 1. 1A) 

2 To draw a random pattern maze within a space limited by screen 
3 height and screen width and where the gap between each parallel 
4 wall shall be equal to the value stored in WALSIZE less one. 

5 First scale the boundaries of the maze so that there is always 
6 the same space between adjacent parallel walls. The maze is 

7 going to be drawn by plotting a series of small walls of length 
8 WALSIZE +1. Calculate roughly how many of these small walls are 
9 needed to fill the maze and store the number in LINES. 

10 The maze is made up of HEDGES letter H and WALKWAYS character 
11 To draw the maze, draw a border and repeatedly for the number 
12 of LINES 1) Pick a random starting point 


13 2) pick a random direction 

14 3) caculate the end point of the short wall 

15 4) if it is not a hedge or outside the array then plot the wall. 
Listing 13 


0 ( LISTING 14 - MAZE DRAWING: GLOSSARY OF WORDS ) 
1 ( 48K SPECTRUM ABERSOFT fig-FORTH 1. 1A) 
2 


NAME STACK: EFFECTS DESCRIPTION 
3 CPLOT (ascii code,row,col-) plots the given charcter both in the 
4 the array MAZE and on the screen. 
5 CPOINT (row,col-ascii code) returns the character stored in the 
6 array MAZE at point row,col. 
7 PICKSTART (-) selects a random starting point for new wall. Puts 
8 position in ROW-START & COL-START. 
9 PICKDIRECTION (-) selects a random direction for wall. Puts 
10 values in ROW-DIR & COL-DIR 
11 FINDEND (-) calculates end-point of possible new wall. Returns 
12 position in END-ROW & END-COL. 
13 CHECKEND (-flag) Returns a vaue 1 on the stack if the end point 
14 is out of the array or is a HEDGE. 
15 
Listing 14 


0 ( LISTING 14 CONT. - MAZE DRAWING: GLOSSARY OF WORDS CONT. ) 

1 PLOTLNE (-) draws a wall WALLSIZE +1 long from 

2 ROW-START,COL-START to ROW-END,COL-END. 

3 TRYLINES (flag-flag) if the flag on the stack is zero then 

4 a new starting point is calculated for the next wall. Otherwise 
5 the next wall will start from the end of the last wall plotted. 
6 Five attempts are then made to draw a new wall. If it is not 

7 possible then a new starting point is chosen. 

8 This routine can be interrupted by pressing the SPACE key. 

9 This will end the drawing of the maze. 

10 A flag is left on the stack indicating 1,successfull drawing 
11 of wall. 2,abandon drawing of maze. 


12 DRAWMAZE (-) controls the drawing of the number of walls. 

13 DRAWBORDER (-) draws a border for the maze. 

14 DISPLAYMAZE (-) draws array containing maze on the screen. 

15 TEST (-) will always produce the same maze.(Change 1 to alter.) 


Listing 14 (continued) 


( LISTING 16 - LEAVE MAZE ROUTINES) 
( 48K SPECTRUM ABERSOFT fig-FORTH 1. 1A) 


0 
1 
2 
3: UNFILL 

4 . MAXROW @ 1 DO MAXCOL @ 1 DO J I CPOINT HEDGE = 
5 IF ( DO NOTHING) ELSE WALKWAY J I MAZE ! THEN 
6 LOOP LOOP ; 

7 : MAKEEXIT WALKWAY MAXROW @ 2 - MAXCOL @ MAZE ! 
8 ALKWAY MAXROW @ 1 - MAXCOL @ MAZE ! ; 


10 0 VAR EASTLIMIT 
11 0 CON NORTHLIMIT 
12 0 VAR EXITFOUND ne 
13.111 ( ASCII ©) CONSTANT FOOTSTEP 
14 42 ( ASCII *) CONSTANT PATHMARK 
15 : PGSMUDGE SMUDGE ; IMMEDIATE 


Listing 16 


0 VAR SOUTHLIMIT 
0 CON WESTLIMIT 
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0 ( LISING 17 - LEAVE MAZE ROUTINES CONT. ) 

1 ( 48K SPECTRUM ABERSOFT fig-FORTH 1. 1A) 

2 SETLIMITS MAXCOL @ EASTLIMIT ! MAXROW @ SOUTHLIMIT ! ; 
3 SETLIMITS 

4 : SEEKEXIT ( LAT, LON-) PGSMUDGE R> ROT ROT 

5 >R >R I NORTHLIMIT = I SOUTHLIMIT @ = OR 

6 Lo WESTEIMET =" OR EL RASTEIMIT .@-= ORR R>Y ROT 

#4 IF 1 EXITFOUND ! 

8 ELSE 

9 OVER OVER FOOTSTEP ROT ROT CPLOT 

10 ( ‘TRY’ EAST) 

11 OVER OVER 1+ CPOINT WALKWAY = 

12 IF OVER OVER 1+ SEEKEXIT THEN 

13 EXITFOUND @ NOT 

14 DE OC TRY: SOUTH) 

15 OVER 1+ OVER CPOINT WALKWAY = --> ( COMPILE NEXT SCREEN) 
Listing 17 

0 ( LISING 17 - LEAVE MAZE ROUTINES CONT. ) 

1 ( 48K SPECTRUM ABERSOFT fig-FORTH 1. 1A) 

2 IF OVER 1+ OVER SEEKEXIT THEN 

3 THEN EXITFOUND @ NOT 

4 IF ( TRY WEST) 

5 OVER OVER 1 - CPOINT WALKWAY = 

6 IF OVER OVER 1 - SEEKEXIT THEN 

we THEN EXITFOUND @ NOT 

8 IF ( TRY NORTH) 

9 OVER 1 - OVER CPOINT WALKWAY = 
10 IF, OVER 1 - OVER SEEKEXIT THEN 
"he THEN 
ip THEN EXITFOUND @ IF PATHMARK ROT ROT CPLOT 
Les ELSE DROP DROP THEN >R PGSMUDGE ; 
14 LEAVEMAZE ( -) UNFILL MAKEEXIT 0 EXITFOUND ! DISPLAYMAZE 
LS 1 1 SEEKEXIT 20 0 AT EXITFOUND @ 0= IF." NO WAY OUT! "THEN; 


Listing 17 (continued) 


( LISTING 18 - EXPLANATION OF METHOD TO LEAVE MAZE) 

( 48K SPECTRUM ABERSOFT fig-FORTH 1. 1A) 
Assume the maze is a rectangular enclosure divided into squares 
each square being either covered by a hedge or not. The 
perimeter squares are all hedge covered except for one or more 
exits. You are released somewhere inside the maze and you have 
to find your way to an exit. You may move from square to square 
in any direction except diagonally, but you cannot cross a 
hedge. The maze is represented in the two dimensional array 
MAZE. Letter 'H' represents a hedge and character '.' a pathway. 
( To find a path from square to an exit,a possible solution:-) 
IF square S is on the perimeter THEN exit from maze 
ELSE try heading East 

IF no exitfound yet THEN try heading South 

IF no exitfound yet THEN try heading West 


IF no exitfound yet THEN try heading North ( end) 


Listing 18 


0 
1 
2 
3 
4 
5 
6 
7 
8 


9 
10 
11 
12 
13 
14 
15 


( LISTING 19 - EXPLANATION OF METHOD TO LEAVE MAZE CONT. ) 
( 48K SPECTRUM ABERSOFT fig-FORTH a.) 
We can further refine 'try heading East' ( the others will be 
Similar) 
( Try heading east) 
IF S's eastern neighbouring square is a pathway THEN 

find a path from S's eastern neighbouring square to an exit. 
But 'find a path from...etc.' is the same as the original 
problem. So we can use a recursive word ( i.e. one that contains 
a call of itself) that expects on the stack the coordinates of 
its starting square. 
The proceedure marks each square it visits with a 'footstep' 
so that it doesn't go round in circles. The proceedure when 
it has found an exit marks each square which lies on the path 
with an asterisk (*). The final picture of the maze will show 
the path and any blind alleys which were followed ( listing 21). 


Listing 19 


14 


( LISTING 20 - GLOSSARY OF WORDS FOR LEAVE MAZE ROUTINES) 

( 48K SPECTRUM ABERSOFT fig-FORTH 1.1A) 

UNFILL (-) Empties the maze of pathmarks and footsteps. Gives 

you a 'clean' maze withouthaving to re-draw it. 

MAKEEXIT (-) forms an exit in the bottom right hand corner. 

PGSMUDGE (-) Something I've not explained yet but this word 
has to be used to form a RECURSIVE definition. 

SETLIMITS (-) Initialises the variables that SEEKEXIT uses to 
determine if the exit of the maze has been found. 

SEEKEXIT ( row,col-) uses the row & column provided on the 

stack as the starting point from which to try and find an exit. 

The use of the words R> & >R will be explained in a further 

article. BE CAREFUL to type an equal number of R>'s and >R's 

as shown in the listing! : 

LEAVEMAZE (-) wil] give an output as listing 21 if it uses 


15 the maze produced by TEST. 
Listing 20 
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THE MPF1 PLUS 


Just look at the specification:- 


Technical Specification 


CPU: Z80A — 158 instructions 
Software: 

@ 280/8080/8085 machine code 

@ 280 Assembler, line and 2 pass. 

@ 8K BASIC interpreter (Extra) 

@ 8K FORTH (Extra) 

ROM: 8K Monitor (full listing and 
comments 

RAM: 4K CMOS (2 x 6116) 
Input/Ouput: 48 system |/O lines 
Speaker: 2.25" coned linear 

Display: 20 character 14 segment green 
phosphorescent 

Expansion: 

@ Socket for 8K ROM 

@ Cassette interface 

@ Connectors 40 way, complete CPU bus 
Keyboard: 49 key. Full “QWERTY” real 
movement good tactile feedback 
Batteries: 4 x U11 for memory back-up 
(batteries not included) 

Serial Interface: 165 baud for read/write 
via audio cassette 


Manuals 


7. User's Manual. 8 chapters. 
7. Over view and Installation. 
2. Specification (hardware and 
software). 3. Description of 
Operation. 4. Operating the MPF-1 
Plus. 5. 44 Useful Sub-Routines. 
6. The Text Editor. 
7. Assembler and Disassembler. 
8. System Hardware Configuration. 
2. Experiment Manual. 16 experiments. 
3. Monitor Program Source Listing with 
full commenting. 
4. Also available the MPF-1 Plus Student 
Work Book (self-learning text). 


Accessories 


@ PRT-MPF-1P: 20 character printer. 
Ready to plug in. Memory dump. 

@ EPB-MPF-1P: Copy/list/verify 
1K/2K/4K/8K ROMS. Ready to plug in. 

@ SSB-MPF-1P: Speech Synthesizer. 
Inc. 20 words and clock program. 
7200 words available. 

@ SGB-MPF-1P: Sound Synthesizer 
Board. 

@ |/O—MPF-1P: Input/output board 








Yes! | now realise that |need an MPF1 ' 
PLUS and that it is the lowest cost Z80 
SBC available with all these features. 
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' | enclose £165.00 (£140.00 + £21 VAT 
plus £4 carriage). Overseas P.O.A. 
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FLIGHT ELECTRONICS LTD. 

-_ 

| 
i 
1 
i 


I 
| 
i 
j 
i 
] 
] 
t 
I 
ofS o | 

Account No. ; 
1 

Ee tepbed leh tated etre ed be 
i 

t 

1 

q 

I 

i 

E 

j 

i 

f 

el 

qj 


Please debit my 





Barclaycard/Access 


§ An invoice will automatically be sent. 
i 


| Name 
Address 


t 
I 
l 
i 
Signature 
' Date 





ee 


AVERY POWERFUL, TRUE 
MULTITASK LANGUAGE 


AS FAST AS MACHINE CODE 
SIMPLER THAN BASIC 


Write Machine Code ina 
fraction of the time currently 


required 
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Software: Reproducible randoms 


M. D. Buxton 








NON-RANDOM 


RANDOM NUMBERS 


The whole point of random numbers is that they 
are unpredictable, so a program that makes use 
of them can be very difficult to debug. This 
article offers a simple solution using a resource 
at hand in every computer. 





ave you ever needed a set of 
Hes: numbers for debug- 

ging, testing or other pur- 
poses? Perhaps you have used a 
simple subroutine such as this which 


will generate 100 random numbers in 
the range 1-10: 


10018 FOR I=1 TO 1869 
18028 R=RND (10) 
18038 PRINT R 

18048 NEXT I 

180058 RETURN 


However, the random numbers will 
not be the same every time that sub- 
routine is used. One way of getting 
round this is to put the numbers in an 
array and extract them as required: 


10 DIM R(100) 


180018 FOR I=1 TO 180 
10828 R=RND (10) 
18039 R(I)=R 

10848 NEXT I 

18858 RETURN 


Another simple subroutine in the 
same program can be used to 
extract these random numbers so 
that they reappear in the same order: 


20010 FOR I=1 TO 1090 
20628 PRINT R(I) 
20030 NEXT I 

20049 RETURN 


Unfortunately, the sequence of ran- 
dom numbers will stay unchanged 
only during one run. The advantage 
over the techniques used in the first 
subroutine is that the array can be 
examined as many times as 
necessary during the run. A disad- 
vantage is that large arrays need a 
lot of memory. Where practicable, 
integer arrays should be used in this 
sort of application. 

How about using READ and 
DATA statements? The data read in 
would be the same for every run! 
Let's see: 


18 DIM R(1@) 

20 DATA. 19;'4/4,3,7,3,5,6, 2 
386 FOR I=l TO 186 

48 READ R 

5@ R(I)=R 

60 NEXT I 


280018 FOR I=l TO 190 
20820 PRINT R(L) 
26838 NEXT I 

20048 RETURN 


Well, a program based on this is not 
so bad for only 10 ‘random’ numbers 
but what about a 100 or a 1000? For 
some purposes, it may not be 
necessary to hold the numbers in an 
array (economising on memory) but 
rather use READ and RESTORE. 
There is still the problem of slaving 
over a hot keyboard, keying in that 
innumerable ‘random’ data. 


NON-RANDOM 
RANDOMS 


There is an easier way, if you do not 
mind the fact that the numbers 
generated are not genuinely random 
and do appear to have a bias in their 
distribution. Have you PEEKed your 
computer's ROM to find a mass of 
seemingly random numbers in the 
range O to 255? The Level II ROM 

of the TRS-80 Model I occupies 
addresses 0 to 12287, so there are 
plenty of these ‘random’ numbers 
available. PEEKing addresses other 
than those in the ROM reveals more 
numbers but these are not always 
reproducible. The contents of the 
addresses in the ROM do not 
change in the course of running 

a program unless there is a catas- 
trophe! Such an event is likely to dis- 
courage to computer from 
functioning at all. 

Now that we have ‘random’ num- 
bers, what to do with them? Can they 
be manipulated to produce a set of 
numbers within a certain range? In 
short, yes they can. One technique is 
to PEEK consecutive addresses and 
accept the contents if they lie within 
a certain range. 

Another way is to scale the num- 
bers obtained. This sort of subroutine 


will produce ‘random’ integers in the 
range |-10Q: 


19018 FOR I=1 TO 186 
16920 R=INT (PEEK (I) /25) 
19038 PRINT R 

19048 NEXT I 

188508 RETURN 


This subroutine will always produce 
the same 100 ‘random’ numbers. 
There is no need to use an array to 
keep them safely; they are readily 
accessible. 

This sort of technique may not suit 
your requirements when random 
numbers considerably larger than 
299 are needed. One way of pro- 
ducing ‘random’ numbers up to 
65535 is to add the contents of one 
address to 256 times the contents of 
another address: 


19018 FOR I=1 TO 100 

10820 R=PEEK(I) + 256*PEEK(I+1) 
196308 PRINT R 

18049 NEXT I 

18058 RETURN 


Another technique? Not a few pro- 
grams involve branching if a condi- 
tion is met. Perhaps something along 
these lines: 


18 FOR I=1 TO 1600 

20 IF PEEK(I)>204 THEN PRINT 
11] HIGH" 

38 NEXT I 


Roughly 23% of the contents of the 
addresses are greater than 204, 
causing "HIGH" to be printed about 
230 times. This information can be 
used to create random mazes at 
higher speeds than those created in 
this sort of way: 


18 RANDOM 

28 CLS 

38 R=RND (11200) 

46 FOR I=8 TO 1823 

59 IF PEEK(I+R)>204 THEN POKE 
15368+1,191 

68 NEXT I 

76 PRINT@O,"READY"; 

88 GOTO 88 


The program generates random 

numbers between | and 100. If the 
number is less than 24 then a 

graphic block is POKEd into the 
video RAM which starts at address 
15360 and occupies 1024 bytes. | 
This is done for all the 1024 

addresses, resulting in a random 

maze of about 235 graphic blocks. 

The program occupies 135 bytes 

and takes about 20 seconds to pro- 

duce the maze. Note that the maze is 
different every time that the program 

is run. Now try this program: 


108 CLS 


30 IF PEEK(I)>204 THEN POKE 
15360+1,191 

40 NEXT I 

50 PRINT@@,"READY"; 

68 GOTO 60 


f 

| f 

20 FOR I=8 TO 1623 
: 
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This program occupies | 13 bytes 
and takes about 10 seconds to pro- 
duce the maze which is the same 
every time that the program is run. 

Now suppose that you like the 
speed advantage but don't want the 
reproducibility of the maze? Simply 
start PEEKing from a different 
address, for example this program 
which takes up 126 bytes: 


18 RANDOM 

28 CLS 

38 FOR I=8 TO 1023 

48 R=RND (100) 

5@ IF R<24 THEN POKE 15366+1,191 
68 NEXT I 

76 PRINT@O,"READY"; 

88 GOTO 8@ 


This program still occupies less 
memory than that in Listing 8 and 
takes about 13 seconds to produce a 
maze. 

I have not exhausted all 
possibilities, such as the use of ran- 
dom numbers to produce random 


Listing 1. The ATMAN program. 


1@ REM ** ATMAN BY M.D. BUXTON 1983 


20 REM ** INITIALIZE VARIABLES 
39 DEFINT A-Z 

48 REM ** START OF VIDEO RAM 
58 C=153698 


69 REM ** @ SYMBOL AND SCREEN WIDTH 


78 C1=64 

88 REM ** INCREMENT OF MOVEMENT 
98 C2=1 

180 REM ** GRAPHICS BLOCK 

1186 C3=191 

128 RANDOM 

138 REM ** ATMAN ARRAY 

149 DIM R(29,3) 

158 REM ** NUMBER OF ATMEN 

168 NR=1 


letters, but such delights I leave to 
you. However, as an example of a 
game which utilises reproducible 
random numbers, there is... 


ATMAN! 
ATMAN-IA 


The computer creates a maze 
through which a solitary figure is 
directed home by use of the numeric 
keypad. A bulky slow-witted ATMAN 
will probably try to stop its progress 
by jumping on it. Should the ATMAN 
succeed, you will be given another 
chance to try. In the event that you 
succeed, you will be given the 
chance to try against an increased 
number of ATMEN. The game con- 
tinues until you give up or eventually 
defeat the maximum of 20 ATMEN. 

As it stands, the program 
occupies over 6K of RAM. By omit- 
ting REM statements and spaces it 
can be reduced to less than 4K. The 
copious REMs should make the pro- 
gram self-explanatory. 


NON-RANDOM NUMBERS 





548 REM ** NEW CO-ORDINATES CALCULATED 
556 REM ** TX IS NEW VALUE OF X 
560 REM ** TY IS NEW VALUE OF Y 


570 TX=X-C2 
588 TY=Y+C2 
‘598 GOTO 8390 
600 TX=X 

618 TY=Y+C2 
628 GOTO 838 
638 TX=X+C2 
648 TY=Y+C2 
658 GOTO 838 
668 TX=X-C2 
678 TY=Y 

688 GOTO 838 
698 GOTO 1546 


176 REM ** SET UP MAZE AND INSTRUCTIONS IF REQUIRED 700 TX=X+C2 


189 GOTO 1976 

198 REM ** BUILD UP HOME REGION 
208 PRINT@31,"(4 SPC] "; 

219 PRINT@95,"([4 SPC]"; 

220 PRINT@159,"[4 SPC] "; 


710 TY=Y 

7286 GOTO 830 
730 TX=X-C2 

7480 TY=Y-C2 

758 GOTO 836 


238 REM ** THIS FORCES AN UPPER CASE 'X' 760 TX=X 


248 POKE 15436,88 

258 REM ** BORDERS FOR MESSAGES 
268 FOR Z=C2 TO 15 

270 POKE C+C1+Z,C3 

298 NEXT Z 


390 REM ** BUILD UP PLAYER'S START 


319 ‘REM .** PLAYER IS: *'0o* 
328 PRINT@868,"(5 SPC]"; 
336 PRINT@924,"[2 SPCJO[2 SPC] "; 
348 PRINT@988,"[(5 SPC]"; 


7706 TY=Y-C2 
788 GOTO 8390 
798 TX=X+C2 
808 TY=Y-C2 
818 GOTO 838 


820 REM ** KEEP ON SCREEN 

838 IF TX>63 THEN TX=63 ELSE IF TX<@ THEN TX=0 
848 REM ** PREVENTING WRAP-AROUND 

859 IF TY>16 THEN TY=16 ELSE IF TY<@ THEN TY=@ 
860 REM ** TP IS TO BE PEEKED (NEW LOCATION OF 


358 REM ** SET KEYBOARD MOVEMENT NUMBER TO ZERO PLAYER 

368 K=0 878 TP=C+TY*C1+TX 

378 TF NRsl. THEN PRINTOAS , * 4s eee es se eeeeee® 880 REM ** KEEP ON SCREEN 
388 IF NR>1 THEN PRINT@O,"*";NR;"* ATMEN *"; 898 IF TP>16383 THEN 1119 


398 GOTO 1780 
408 REM ** PLAYER PROMPT 
419 PRINT@45,** YOUR * MOVE *"; 


4308 ZS=INKEYS 
449 IF Z$="" THEN 519 
450 REM ** KEYBOARD DIRECTION 


468 REM ** THIS PREVENTS ‘FREEZING’ 


OR A LETTER 
470 L=VAL (Z$) 
480 IF L=6 OR L=5 THEN 436 
499 K=VAL(Z$) 


500 REM ** AFTER SETTING UP, K SHOULD BE ZERO 


510 IF K=@ OR K=5 THEN 4396 


528 REM ** NEW POSITION OF PLAYER 
538 ON K GOTO 578,6090,6380,6609,698,709,730,766,798 
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969 REM ** CURRENT LOCATION OF PLAYER 


910 PP=C+Y*C1+X 


920 REM ** JUMPING TO WHAT? 
428 REM ** HAS KEY BEEN PRESSED TO ALTER DIRECTION? 930 TL=PEEK (TP) 


940 REM ** SPACE 


958 IF TL=32 THEN 10390 


969 REM ** ATMAN 


BY PRESSING 6,5 970 IF TL =Cl THEN 1546 
980 REM ** HOME AND WIN 
999 IF TL=88 THEN 1630 
1800 REM ** WALL OR OTHER - NO MOVE 


1918 GOTO 1119 


1930 POKE TP,79 


1928 REM ** POKE PLAYER INTO NEW POSITION 


1948 REM ** POKE BLANK INTO PLAYER'S OLD POSITION 


18058 POKE PP,32 
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1868 
1878 
1880 
1890 
1198 
1119 
1129 
1130 


1140 
1150 
1169 
1178 
1188 
1199 
1290 
1210 
12290 
1230 
1249 
1250 
1260 


1278 
12890 


1298 
1309 
1319 
13298 
1330 
1348 
1358 
1360 
1376 
13890 
1398 
1480 
1410 
1420 
14390 
1449 
1458 
1460 
1476 
/ 1488 
1498 
1580 
1519 
1528 
1530 
1548 
1568 
1578 
1589 
1596 
1689 
1619 
1629 
16398 
1649 
1656 
1666 
1679 
1680 


1699 
1780 
1718 


1726 
1/50 
SAME 
1746 
17508 
1766 
1779 
1780 
1798 
1800 
18190 
1820 
1830 
18490 
1858 
1869 
1876 


REM ** UPDATE 

X=TX 

Y=TY 

IF TL=88 THEN 1619 

REM ** REPLACE PLAYER PROMPT 

PRINT@45," ATMAN * MOVES "; 

FOR I=C2 TO NR 

REM ** CAN THE ATMAN MOVE? DELETE THE REM FROM 
LINE 1150 TO ALTER THE CHANCE OF AN ATMAN MOVING 
FROM CERTAIN TO 1 IN 3 


R(I,3)=-C2 
REM ** IF RND(18)>3 THEN R(I,3)=0 
NEXT I 


FOR I=C2 TO NR 

REM ** ASSIGN VALUES TO TEMPORARY VARIABLES 
REM ** BX IS HORIZONTAL CO-ORDINATE 

BX=RiI1.,:1,) 

REM ** BY IS VERTICAL CO-ORDINATE 

BY=R(I,2) 

REM ** MOVE FLAG NOT SET? 

IF R(I,3) THEN 15290 

REM ** HORIZONTAL AND VERTICAL DISTANCES 

REM ** DX IS HORIZONTAL DISTANCE FROM ITH ATMAN 
TO PLAYER 

DX =ABS (R(I,1)-X) 

REM ** DY IS VERTICAL DISTANCE FROM ITH ATMAN 
TO PLAYER 

DY=ABS (R(I,2)-Y) 

REM ** WHICH DISTANCE IS GREATER? 

IF DX<DY THEN 1360 

REM ** ADJUST HORIZONTAL DISTANCE 

IF R(I,1)>X THEN BX=R(I,1)-C2 ELSE BX=R(I,1)+C2 
GOTO 13898 

REM ** ADHUST VERTICAL DISTANCE 

IF R(I,2)>Y THEN BY=R(I,2)-C2 ELSE BY=R(I,2)+C2 
REM ** BP IS PROVISIONAL LOCATION OF ITH ATMAN 
BP=C+BY*C1+BX 

REM ** KEEP ON SCREEN 

IF BP>16383 OR BP<C THEN 152¢ 

BC=PEEK (BP) 

REM ** STUCK? 

IF BC=32 OR BC=79 THEN 1450 ELSE 1520 

REM ** MOVE ATMAN 

POKE BP,Cl 

POKE (C+R(I,1)+R(I,2)¥*Cl) ,32 

REM ** COLLISION 

IF BC=79 THEN 154@ 

REM ** UPDATE 

R(I,1)=BX 

R(I,2)=BY 

NEXT I 

GOTO 419 

PRINT@(X+C1*Y) ,"SPLAT!"; 

GOSUB 2539 

IF Z$<>CHRS$(13)' THEN 1560 

CLS 

PRINT "YOU HAVE FAILED." 

GOTO 1736 

PRINT@O," SUCCESS!!! "; 

REM ** INCREMENT NUMBER OF ATMEN 

NR=NR+C2 

PRINT@512,"PRESS ENTER TO CONTINUE."; 

GOSUB 25390 

IF Z$<>CHRS$(13) THEN 1659 

IF NR<21 THEN 17190 

PRINT@512,"YOU HAVE DEFEATED ALL OF THE ATMEN! 
WOULD YOU LIKE TO START AGAIN? Y/N " 

GOSUB 25390 

IF ZS="Y" THEN RUN ELSE END 

PRINT@512,"WOULD YOU LIKE TO TRY AGAIN WITH ONE 
MORE ATMAN? Y/N " 

GOTO 1749 

PRINIT@DLZ, WUULUV YUU LIKE TU TRY AGALN WILITH THE 
NUMBER OF ATMEN? Y/N" 

GOSUB 25390 

IF Z$="N" THEN END ELSE 1979 

REM ** SET UP ATMAN ARRAYS 

REM ** 20 ATMEN 

FOR I=C2 TO NR 

REM ** RANDOM COLUMN 

RX=RND(C1)-C2 

REM ** RANDOM ROW EXCEPT TOP 

RY=RND (15) 

REM ** LOCATION IN MEMORY 

RL=C+RX+C1*RY 

REM ** SPACE FOR ATMAN 

IF PEEK(RL)<>32 THEN 1800 

REM ** X CO-ORD 
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1888 R(I,1)=RX 

1899 REM ** Y CO-ORD 

1988 R(1I,2)=RY 

1919 REM ** FLAG FOR MOVEMENT 

1926 R(I,3)=6 

1930 NEXT I 

1949 IF NR=l THEN PRINT@O," * ONE * ATMAN "; 
1959 REM ** PLAYER PROMPT 

1968 GOTO 419 

1978 CLS 

1989 PRINT"ATMAN GAME" 

1999 PRINT"@@@eeeeeee" 

2000 PRINT 

2018 PRINT"WOULD YOU LIKE INSRUCTIONS? Y/N " 
2028 GOSUB 2536 

2030 IF ZS="N" THEN 2290 


2048 CLS 
2858 PRINT" I WILL PRINT A RANDOM MAZE COMPRISING 
SPACES 
WALLS *sCHRS (C3) >." 
ATMEN @ 
A HOME X 


AND YOURSELF 0" 

2060 REM ** THESE POKES FORCE THE CORRECT CHARACTERS 
IF THE LOWER CASE DRIVER PROGRAM OF SEPTEMBER 
'82 CT IS BEING USED 

2078 POKE 15595,C3 

2088 POKE 15633,88 

2098 PRINT 

2190 PRINT"USE THE NUMERIC KEYPAD TO DIRECT YOUR MOVE 

MENT AND EVENTUALLY GET HOME." 


2119 PRINT 

2128 PRINT"7=UP AND LEFT 8=UP 9=UP AND RIGHT" 
2139 PRINT 

2148 PRINT"4=LEFT 6=RIGHT" 

2158 PRINT 


2168 PRINT"1=DOWN AND LEFT 2=DOWN 3=DOWN AND RIGH 

B icy 

2170 PRINT 

2188 PRINT 

2198 PRINT"USING ANY OTHER KEY WILL NOT WIN THE GAME 

FOR YOU!" 

2208 PRINT"PRESS ANY KEY TO CONTINUE." 

2218 GOSUB 2536 

2228 CLS 

2230 PRINT"*HITTING THE KEYS RAPIDLY WILL NOT RESULT 

IN FASTER MOVEMENT*YOU MAY ALTER DIRECTION WHEN YOU 

HAVE SEEN THE * YOUR MOVE * MESSAGE APPEAR IN THE TOP 

RIGHT HAND CORNER OF THE SCREEN." 

2249 PRINT"FAT ATMEN WHICH CAN'T GET BETWEEN DIAGONAL 

LY JOINING WALLS (UNLIKE YOU) WILL TRY TO JUMP ON YOU 

! THEY ARE PERSISTENT BUT NOT VERY INTELLIGENT. THEY 

ARE NOW HIDING IN THE WALLS."; 

2250 PRINT" SOME OF THE MORE DEVIOUS ATMEN WILL NOT A 

PPEAR IMMEDIATELY. SOME WILL WAIT, HOPING THAT AS YOU 

PASS THEY WILL BE ABLE TO JUMP ON YOU IN A SURPRISE A 

TTACK! LESS PATIENT OR EVEN LESS INTELLIGENT ATMEN WI 

LL APPEAR FOR NO APPARENT REASON." 

2268 PRINT"PRESS ANY KEY TO CONTINUE." 

22868 GOSUB 2536 

2298 CLS 

2308 REM** CO-ORDS FOR PLAYER START 

2319 X=36 

2326 Y=14 

2338 CLS 

2348 PRINT"PRESS R FOR A RANDOM MAZE. PRESS ANY OTHER 

KEY FOR AN UNCHANGING MAZE." 

2358 GOSUB 2530 

2360 IF Z$<>"R" THEN 2460 

257¢..CLS 

2388 REM ** SELECT ROM AREA 

2398 R=RND (11290) 

2496 FOR P=R TO R+1623 

2419 REM ** WALL OR SPACE 

2420 IF PEEK(P)>22@ THEN POKE (P-R+C) ,C3 

2438 NEXT P 

2448 REM ** RANDOM MAZE DONE 

2458 GOTO 200 

2468 CLS 

2478 REM ** THIS IS TO CREATE AN UNCHANGING RANDOM 
MAZE 

2488 FOR P=8 TO 1023 

2490 IF PEEK(P)<25 THEN POKE C+P,C3 

2506 NEXT P 

2518 GOTO 200 

2526 REM ** KEYBOARD SCAN ROUTINE 

2538 ZS=INKEYS$ 

2548 IF Z$="" THEN 2530 ELSE RETURN 

2558 END 
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Review: Improved Apple editor 


Henry Budgett 











LOSTOCK — 
SCREEN EDITOR 


The Apple’s archaic editing system is enough to 
give anyone the pip. Now the Lostock Screen 
Editor offers an improved performance for owners 


of the Il, II+ and lle. 





ne of the most fundamental 

utility programs built into any 

computers operating system 
must surely be its screen editor. 
Without such a routine the user is 
lorever condemned to retyping 
everything that has a mistake in it. 
While this may just about be 
tolerated on a single word it certainly 
causes immense frustration when an 
&Q-character line of BASIC has to be 
keyed again. 

There are three common types of 
screen editor; the line editor, the 
memory editor and the text editor. 
The first of these dates from the days 
when computers were rare and 
access was only available through a 
remote terminal such as a Teletype. 
The incorrect line could be recalled 
and edited with a series of com- 
mands; the Tandy series of com- 
puters still retains this system, as 
does the Dragon 32. 

The memory editor first appeared 
on the Commodore PET and is regar- 
ded by some as the best form of 


_ screen editor you can have. To edit a 


line all you have to do is move the 
cursor to the incorrect portion, 
change it and press Retum. 
However, it is possible to create 
phantom lines and once a change is 
made you cannot see the previous 
state of the line on the screen. | per- 
sonally don't favour this kind of editor 
as its all too easy to make serious 
mistakes, but it does have the 
advantage of speed and ease of use. 

As a half-way house between the 
distinct clumsiness of a line editor 
and the speed of the memory editor 
there is the text editor. Possibly the 
best example currently available is 
the one supplied on the BBC 
Microcomputer/Electron. The idea is 
simple; you move a ‘copy’ cursor 
around with the direction keys and 
anything that you wish to add to the 
new line is actioned by the Copy 
Key. In this way a new line can be 
built up from parts of other lines as 
well as new input from the keyboard. 
There are no clumsy command 
sequences to remember, which 
makes it much simpler to use than a 


“ESSERE SA» eR ET ESE I ES TSE ES UI EI Ea AR TAR PE ORES ES SRS MERERORESONN, 


48 


line editor, and the original version is 


retained on the screen for 


comparison. 


ONE BAD APPLE 


Of all the microcomputer editing 
functions which have been based 
around these three systems the one 
that stands out on its own is that of 
the Apple Il. It is, quite simply, 
appalling! Despite the improvements 
when the Apple II+ was introduced, 
and the addition of a full set of cursor 
keys on the Apple Ile, it must still 
rank as the least useable editor ever, 

To edit a line of program or even 
a mistyped command is slow and 
awkward. The original (Apple ID 
method required that the Control key 
be used in conjuction with the WZAS 
keys to give Up, Down, Left and 
Right movements of the cursor. The 
Apple II+ improved this slightly by 
offering the Escape Mode _ editor, 
Here the cursor movements are con- 
trolled by the IMJK keys once the 
Escape key had been pressed. In 
both cases the Right arrow key would 
copy the characters it passed over 
into the line buffer and the Left arrow 
would delete characters. Unfor- 
tunately, the characters you were 
putting into the buffer couldn't be 





seen and it was all too easy to miss 
letters or delete characters. To further 
compound, the problem, the 
Applesoft interpreter re-formats the 
spacing of the lines displayed by 
LIST. While this makes the programs 
very legible it can make editing them 
a nightmare; text strings get split and 
umpteen spaces are added which 
must be stepped over or they end up 
in the new line. 

Small wonder, then, that among 
the most popular utility programs for 
the Apple are decent line editors. 
One of the more recent offerings is 
the Lostock Screen Editor which is 
supplied as a HELLO program on 
disc together with a manual. For 
those readers unfamiliar with the 
Apple it is probably worth explaining 
the function of the HELLO program. 
Apple discs can be created as Mas- 
ters or Slaves; the former carry all the 
DOS information while the latter do 
not. When an Apple is powered up 
with a Master disc in its drive it 
automatically loads a file called 
HELLO from the disc. As well as 
loading the DOS this can be a pro- 
gram in its own right, so the user can 
set up a menu or automatically load 
utility programs. In the case of the 
Lostock Screen Editor it loads and 
initialises the editor program. 

In use the editor converts the 
Apple's primitive editing facility into 
something approaching the BBC 
Micro's text editor. To initialise the 
editing function, simply type Control- 
W and the normal Apple cursor is 
replaced by an underline symbol. 
This is the copy cursor and can be 
moved around the screen with the 
Control-WZAS keys. 

Once the copy cursor is over the 
part of the line you wish to copy, 
simply press the Right arrow — the 
letters that it copies will appear on 
the input line. Deletion may be 
achieved with the Left arrow: charac- 
ters are removed from the input line 
and not the copy cursor position. 
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APPLE SCREEN EDITOR 


card, some of the Control functions 
r clash. Examples of this are Control- 
W which scrolls the screen, Control-Z 
which clears the current line and 
; Control-Q which reverts the display 
. to 4Q-column! Perhaps it’s not such a 
1 good idea to use it with an active SO- 
| column card. . 
‘ The Lostock editor is normally 
‘ supplied on its own but for an extra 
£5 it comes with an extra program- 
mers aid, an auto line numberer. 
‘ Whether my copy was sick or there is 
a genuine bug I'm not sure, but dur- 
: ing the initialisation of the facility 
: some odd things happen. To tum the 
‘ numberer on one simply presses 
" Control-A and a prompt appears 
: asking for the first line number, the 
default being 10. However, if you 
press Return to either this prompt or 
: the one asking for the increment, all 
; _ : : : : sorts of garbage appears under the 
D Apple owners with this package can let their fingers do the walking moreeasily... Cursor. Ihe facility worked perfectly 
) oS nnn Otherwise but there's something not 
t Full compatibility with the Apple just press Control-Q — when'the cur quite right with its manners. 
j Il+ and Apple Ile is maintained so « sor gets to the end of the screen line As a visible means of support the 
: both Escape-IMJK and the arrow’ . it jumps to the beginning of the text Lostock editor is supplied with a slim 
i keys can be used too. In the Escape on the next screen line. This mode 16-page A5 booklet. Mind you, with 
1 mode of editing, the copy cursor canbe'cancelled (sometimes there is just five commands to remember for 
j becomes an inverse E and the a conflict between BASIC’s spacing the editor, plus three for the auto 
: Space bar is used instead of the and the LIST format) by Control-P. numberer, the manual is sufficient. 
| Right arrow to change from move- The final touch provided is a double Indeed, the last page of text (the last 
ment to copying. keystroke LIST which is actioned by three pages are blank) is a quick 
5 While these functions go a long Control-L — well it's a 50% saving! reference table'and that's all I use 
5 way to relieving the problems — suppose! these days.. There appear to be no 
; now, at least, you can see what ; omissions or mistakes in the 
5 youve copied — they aren't the end AN EDITOR’S HOME... documentation and the known pro- 
; of the Lostock's repertoire. If yourmis- The Lostock editor lives inthe section blems are outlined, although not 
. take was in the first section of the line of Apple's memory between the DOS covered in depth, so it serves its 
: and you don't want to be bothered and the input buffers and this means purpose. 
5 with trudging the cursor across the that its pretty safe from attack by Probably the only conclusion that 
5 rest ol the screen just press Control your BASIC orograms. Many com- [can draw from using the editor, and 
E. This copies the rest of the screen mercial packages and other pro- Ive been doing so for several 
: line into the buffer and moves down gramming aids also seem to have months, is that it seems to have 
| to the beginning of the next screen this area pencilled in for their living become firmly attached to every one 
‘ line. Neat, but care must be taken to space, so it's worth checking their of my BASIC development discs! In 
1 remember to press Retum to enter compatibility with Lostock. One cer terms of value for money it probably 
5 the completed line — some wonder- tain way of ‘disconnecting’ the editor doesn't score very highly — £5 for 
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ful things can happen if you forget! 
The other major bugbear that 
the Lostock editor solves is that of 
the LIST formatting: Normally the 
experienced Apple user will do a 
guick POKE 33,33 betore LISTing 
and squash the screen width. This 
dodge causes the formatting to be 
suppressed. Using the Lostock editor 
method is rather neater. If at any time 
during a line edit you want to tell the 
editor to ignore all the extra spaces 





‘is by the IN# command, and the 


manual recommends that IN#0 is 
used to effect a controlled discon- 
nection. To get the editor back (who 
needs these thespians anway!), all 
that is needed is a quick Reset or an 
& <Retum> from Applesoft. Monitor 
users can get their functions back 
with Control-Y <Retum>. 

The main reason for wanting to 
disconnect the editor is that with an 
Apple Ile running an 80-column 


SANE ITT ASAE ANE RTS ATTA 


the addition of an auto line numberer 
is a little steep — but then it has cer- 
tainly saved both time and frustration 
during the preparation of two issues- 
worth of Orchard Computing. What 
it does show up, though, is that the 
Apple's screen editor is still one of 
the worst and any improvement, 
however small, is welcome! 

Lostock Software are at 13, Cran- 
bome Close, Lostock, Bolton, Lancs 


BL6 4JG. 















COMMAND FUNCTION Control-O Ignore LISTing tormat's extra spaces 
Control-P Revert to LlSTing format 
Control- W Call the Editor Control-L Output List 
Control W,A,S,Z Move the copy cursor (Apple II) . 
Escape-I,J,K,M Move the copy cursor AUTO LINE NUMBERER COMMANDS 
(Apple II+ and Apple Ile Control-A Intialise auto numbering: 

Escape-—, =, 4 Move the copy cursor (Apple Ile) START: first line number (10) 
i: Copy trom copy cursor position INC: increment (10) 

Delete characters in input line Space bar Output next line number 
Control-E Copy to end of screen line Control-O _ Disable auto numbering (Note O not Q) 
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LOOKING FOR INSPIRATION? 


— Tfan 


Er dvertisement 


Then let the 
“CROSSWORD” 
Program help you 


SOLVES ANAGRAMS 
PRODUCES ALL WORDS OF 
ANY LENGTH AND STYLE 
SELECTED AND MUCH. 
MUCH MORE 


s: : | a ie Useful for both Crosswords and Word Puzzles 


An ideal gift for the "CROSSWORD" adult in your life 


ORDER FORM TO: 
Datagrid Systems Ltd, 10 Barley Mow Passage, 
London W4 4PH 


Please sendme...... copy(s) of the "CROSSWORD ’ Program for 
my sinclair 48K Spectrum at £15.95 each. (Incl P&P and VAT). 


ies ce advertisement in o lenclose cheque/PO for........ Payable to Datagrid Systems Ltd. 

the press, in print,on posters orinthe | IR 7 Devs my earciavenr 

cinema which you find unacceptable, | : , 

write to us at the address below. f 
The Advertising , 

Standards Authority. 


ASA Ltd, Dept 3 Brook House, 
Torrington Place, London WCIE 7HN 












Reg/No 1721822 Please allow up to 28 days for delivery 


32K BBC Model B, 16K ZX81 and 16K Spectrum versions available 
before Christmas. Please send for details 








£200 yew od 


HI-FI NOW! —will oe you ever £1 5 to take your . | 
personal stereo like a million dollars—NOW/! . iG se, 


HI-FI bere \ _ even make sure you spend £2,000 


HI-FI Now! —answers. the questions you are askir 
Ak fi-NOW! — 





Sponges RS TE 








Wharfedale, KEF, Rotel, Sansui, Marantz, Cok tayo) a\V/ Pioneer Hitachi. Just some of 
the names in the first issue of HI-FI NOW! | 


Hi-Fi NOW! AT YOUR NEWSAGENT NOW! ONLY 85p! 
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Software: 6502 music routines 


APPLE MUSIC 





Dr. Barry Landsberg 





SOME NOTES ON 
THE APPLE 


Last month we looked ata superior method of 
generating music by machine code routines for 
the 6502. In the second part of the series we put 
a bit of life into the notes by providing improved 


tone. 





ave all of you APPLE owners 
typed in the programs from 

last month's article and lis- 
tened to the ‘Pizzicato Polka’ and the 
‘Toccata’? Perhaps you may have 
even programmed a vast range of 
other tunes already! Ifso, once you 
have got over the initial joy of ex- 
tending the musical range of the 
Apple, you might have noticed that 
the tone quality of the music pro- 
duced still sounds somewhat hollow 
and empty. Furthermore, if you chose 
to examine my suggestion that the 
longest pause possible was given by 
a value of the time parameter T of 
209 and put, say, 500 instead, you 
might have found that half the time 
you get an extraneous ‘click’ gener- 
ated and half the time you don't — 
even though all the registers of the 
6502 have been set to the same 
value in each case! The purpose of 
this article is to provide an explan- 
ation of these points, and also an 
enhancement to the tone quality of 
the music generated by the APPLE 
using software alone. 

The machine code programs pub- 
lished in last month’s article all pro- 
duce music by waiting for a certain 
specified period of time and then 
accessing the address $CO30, which 
according to the Apple Reference _ 
Manual changes the state of the 
loudspeaker either from 0 V to 5 V, or 
from 5 V toO V, depending on its 
previous state. This process is re- 
peated over and over again for the 
duration of the note and produces a 
square-wave with a mark-to-space 
ration of 1. A Fourier series (which is 
just a mathematician’s way of split 
ting up a periodic waveform into a 
sum of sine waves) on this kind of 
square-wave shows that the nth har- 
monic has an amplitude of (sin(n7/ 
2))/n, from which it follows that only 
the odd harmonics are present, and 
the first, third, fifth... harmonics 
have amplitudes of 1, 1/3, 1/5... 
respectively. This situation is shown 
diagrammatically in Fig. la, where 
the waveform is drawn followed by a 
graph showing the relative amounts 
of the first 15 harmonics. This 


analysis is made on the supposition 
that the loudspeaker generates the 
wavetorm that has been fed into it, 
which is not a valid assumption 
especially at higher frequencies. 
still, it does give a rough idea of 
what is happening. Throughout this 
article, the magnitude of the ampli- 
tudes will be taken, and their sign (ie 
whether positive or negative) will be 
ignored. The human ear is relatively 
insensitive to phase anyway. It is the 
absence of even harmonics that is 
the hallmark of musical notes gener- 
ated in such a fashion by the com- 
puter, and that gives rise to the 
characteristic hollowness of each 
note. 


RAISING THE TONE 


Having demonstrated that a square 
wave gives rise to a hollow-sounding 
note, but that the loudspeaker on the 
Apple has only two voltage levels, 
how can we possibly enrich the 
sound of each note without having to 
resort to a digital synthesis method? 
One way to do it is to still produce 


Fig. 1 Square waves with mark-to- 
space ratios of 1:1 (a), 1:3 (b) and 
1:2 (c). Also plotted are the 
amplitudes of the first 15 har- 
monics of these waveforms as 
calculated by a Fourier series 
analysis. 


notes using a square wave, but with 
a mark-to-space ratio not equal to |. 
Consider what would happen if a 
mark-to-space ratio of 1:3 were to be 
generated. The Fourier series analy- 
sis shows that the nth harmonic now 
has an amplitude equal to (sin(n7/ 
4))/n, and although there is no har- 
monic that is a multiple of 4 present, 
there are still plenty of even har- 
monics in the note, and it will cer- 
tainly have a different tone quality to 
that of the normal square wave! 
Figure 1b shows this situation 
diagrammatically, and the result 
would be the same had the mark-to- 
space ratio been 3:1 instead. 

~ Now that we have the hint that 
this kind of waveform might produce 
a more pleasant sound, how do we 
program it under the very stringent 
condition that it must be compatible 
with, and easy to integrate into, the 
music package given in last month's 
article? All kinds of general mark-to- 
space algorithms may be sought, but 
as these would involve extra coun- 
ters so that the routine knows exactly 
when to strobe the loudspeaker and 
when not to, the timing of the loops 
controlling the pitch would be atfec- 
ted and the result would be less than 
musical! One way round the problem 
is to write a routine specitically for a 
1:3 mark-to-space ratio by having 
four identical routines like that of List- 
ing 2 in last month's article, and to 
jump from one to the next in a cyclic 
fashion. In addition, the last two 
routines must not strobe the speaker 
but must take up exactly the same 
time as those that do. To do this, the 
instruction BIT $CO30 (which takes 
four clock cycles and strobes the 
speaker) is replaced by two NOP 
instructions which do nothing at all, 
but also take four clock cycles. 
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The machine code routine to do 
this is given in Listing 6, and starts at 
address $0358, which is immediately 
following that of Listing 4 last month. 
It should be noted that Applesoft and 
DOS use an area of memory starting 
from $03D0 to store some of their 
jump vectors, and so the whole 
music package tucks into this avail- 
able area of memory with only a few 
bytes to spare! The result of all this is 
that we now have a routine which 
plays an enriched sound, and which 
may be invoked by calling sub- 
routine $0358 instead of $0300. 
However, doing this gives rise to a 
note that is an octave below that 
generated by the routine at $0300. 

To integrate this program into the 
package presented last month we 
now only need to alter some CALL 
statements or do a quick POKE! For 
example, we merely replace the 
command CALL 768 in line 60 of 
Listing 3 with CALL 856 in order to 
play a harmonically enriched version 
of the ‘Pizzicato’. However, due to the 
nature of Listing 5 it is played an 
octave lower, but by adding IF I 
THEN I=I+12 at the end of line 30 
we can bring the Pizzicato back to 
the correct pitch. Try comparing the 
two and see for yourselves which is 
preferable! 

The general music package des- 
cribed last month calls Listing 5 to 
set up the musical buffer, and then 
calls Listing 4 to step through the 
_butfer and produce the melody. In 
order to make it generate the en- 
riched sound described above, it is 
only necessary to alter the com- 
mand JSR $0300 command in Listing 
4 to JSR $0858. This may be done 
either from the Apple's monitor, or 
more easily by the command POKE 
851,88 which must be executed 
before CALL 799 is reached. 


It is unfortunate that the ‘Toccata’ 
given as a demonstration of the 
ability of Listing 5 is not the best 
example for this enriched sound 
routine, as the bottom note is already 
so low that making it yet an octave 
lower reduces it to well below that 
acceptable as a musical note. 
Neither may we transpose it up an 
octave as was done for the ‘Pizzicato’ 
because the ‘Toccata’ already spans 
three and a half of the available four 
octaves. Still, if the bottom notes may 
be tolerated, the rest of the ‘Toccata’ 
is certainly enriched. The lesson to be 
leamt from this is not to use anything 
below note 12 when calling Listing 6. 

~ Insummary, the command POKE 
851,88 ensures that Listing 5 plays 
the melody in the musical buffer 
using the waveform with a mark-to- 
space ratio of 1:3, while POKE 851,0 
gets the melody to be played using 
the normal square wave. 


GETTING RICHER 


The reader may wonder at this stage 
why I picked out a mark-to-space 
ratio of 1:3 instead of any other ratio. 
The reason is that, while the normal 
square wave needs two traversals of 
the timing loops for each cycle, the 
1:3 ratio needs four. The periodicity 
(and thus the resultant frequency) is 
therefore halved, and the melody is 
played an octave lower. No change 
of key signature is involved, and the 
optional IF | THEN I=I+12 is only to 
alter the octave at which the melody 
is pitched. Any other simple ratio of 
small whole numbers results in a 
transposition of the music to another 
key, or sometimes even to musically 
non-existent tunings. 

Having gone to all the trouble of 
setting up a program which gener- 
ates a mark-to-space ratio of 1:3, is 
there any way to easily change the 
mark-to-space ratio? Is there in fact 
any need to? Well, after a while, 
even the 1:3 ratio itself starts to 
sound empty and the ear craves yet 
further variety. Perhaps the lack of 
fourth harmonic and the dominance 
of odd harmonics in the waveform 
has something to do with this! It turns 
out to be very easy to convert Listing 
6 into a generator: of square waves 
with a 1:2 mark-to-space ratio. Now 
the nth harmonic has an amplitude 
of (sin(nm/3))/n: this is shown pic- 
torially in Fig. 1c. However, this wave 
shape has a periodicity of 3 cycles 
instead of 2, and thus the notes pro- 
duced have two-thirds of the fre- 
quency of the regular square wave. 
This tums out to be a musical interval 
of a fifth, and thus any pitch para- 
meter P produces a note seven semi- 
tones lower than would be produced 
by Listing 2. 

How then do we convert Listing 6 
to produce a 1:2 mark-to-space 
ratio? We must bear in mind that 
Listing 6 consists of four similar 
routines where only the first two 
strobe the speaker, and all four are 
stepped through in a cyclic fashion. 
It can be fairly easily seen that step- 
ping through the first three only gives 
rise to the desired waveform, and this 
is done by replacing the instruction 
JMP $03B3 (which causes a jump 
from the third routine to the fourth) 
with JMP $035A, which jumps back 
to the first one instead. This may be 
done under program control with the 
instruction POKE 943 90 which con- 
verts the 1:3 waveform to a 1:2 
wavetorm, and the command POKE 
943,179 may be used to regenerate 
the 1:3 ratio again. 

If the commands POKE 851,88 : 
POKE 943,90 are typed into Listing 
9, the ‘Toccata’ is now played inG 
minor (sorry, Bach!), and the above 
commands followed by IF | THEN 
I=[+7 typed in to line 30 of Listing 3 


30 FOR J=1 TO 160 ;: 





80msec 


Fig. 2 The waveform of the 
voltage across the loudspeaker of 
an Apple as measured on an 
oscilloscope. The frequency of 
the waveform is about 13 Hz. 
Note that the flat portion lasting 
about 15 milliseconds is followed 
by a decay with a half-life of about 
10 milliseconds. 











produce the ‘Pizzicato’ with the 1:2 
waveform. It is my opinion that this 
gives rise to the sweetest sounding of 
the notes produced by the wave- 
forms discussed in this article. 

In summary, a complete musical 
package has been given in which 
not only is the melody easily pro- 
grammable as explained in last mon- 
th's article, but by using only one or 
two POKE commands, the waveform 
may be chosen to have a mark-to- 
space ratio of 1:1, 1:2 or 1:3. This 
means that the tone quality may now 
be chosen for any melody, and even 
changed within the melody, some- 
what analogous to pulling stops on 
an organ. This is surely a minimum 
that should be expected from any set 
of programs which purport to play 
music that is actually pleasant to lis- 
ten to! 


THE SPEAKER 
STROBE 


The remainder of this article is con- 
cemed with a feature of the strobe to 
the Apple's loudspeaker, which 
caused me great confusion at first 
while I was writing and testing the 
machine code musical routines. The 
Apple Reference Manual confidently 
asserts that every time the address 
$CO30 is accessed, an audible click 
is generated by the loudspeaker. Is 
this true? Type in the following 
program: 


18 FOR I=1 TO 10 
20 X=PEEK (-16336) 
$CO30 


; REM **%° STROBE 


NEXT J : REM 


=e DELAY 
40 NEXT I 


How many clicks do you hear when 
you run it? Surely we must expect 10, 
but I assure you that there are only 
five! However, if one makes fre- 
quency measurements on musical 
notes produced by the routines in 
this series and does simple timing 
calculations, it is evident that there 
actually is one strobe to the speaker 
for each and every access to the 


address $CO30. 
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This seemingly contradictory 
state of affairs was brought to light 
while trying to understand two obser- 
vations made about the musical 
routines. The first is that a pause with 
a time parameter between 256 and 
911 sometimes produced an unwan- 
ted click and sometimes didn't, as 
mentioned earlier. The second is the 
more subjective observation that 
sometimes low notes sounded worse 
than at other times when using the 
wavetorm with a mark-to-space ratio 


pr 1:3. 


The explanation of all this is to be 
found in the circuit diagram on Page 
114 of the Apple Reference Manual. 
The capacitor C11, along with the 
4’7k resistor and diode, can alter the 
incoming square wave to a step 
followed by a voltage decay for a 
positive-going step, and by a drop to 
O V until the appearance of the next 
strobe for the negative-going step. 


This wavetorm is now the input to a 
Darlington transistor pair which 
actually becomes saturated im- 
mediately after a positive-going step. 


A diagram of the voltage across 
the speaker as a function of time is 
shown in Fig. 2. This was determined 
from a (so-called) square wave of 
about 13 Hz, and was measured on 
an oscilloscope. It is evident that 
there is no voltage decay for the first 
15 milliseconds following the strobe 
(corresponding to the period of time 
for which the Darlington pair is 
saturated), and thereatter the voltage 
decays to zero in an exponential 
fashion with a half life of about 10 
milliseconds. ) 

It is now clear why only five clicks 
were heard in the above program, 
and why some pauses gave extra 
clicks only half of the time — it is 
because when the loudspeaker is left 
in a state with 5 V across it, it decays 


DATA 65279 ,768 ,724 ,686 ,646 ,610 ,575,544 ,514 485 ,453 ,432 408 
DATA 384 362,342,322 304,237 ,271 256,241,228 ,215,203 


2 
3 
4 LATA 191,180,170,160,151,143 134,126,119 ,113,106,100 
5 DATA 95,89,84,30,75,71,67,63,60,56,53,50,47 ,44 


10 GOSUB 1000 

20 AD = 16384:TF = 

30 READ I,T 

40 P = N(I):Pl = 

50 P2 = 
CCT +° UN) </) TE) UR 


256:UN = 1 


INT (P / TF)-+ UN:Tl = 


i 


2 


‘fa 
aoe: 
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INT (T / TF) + UN 
Poe TP) * ENT CCP: UND f EP Oe Nas 


‘U353- AD, OO 
035A- AG FI) 
035C- A4 FC 
O35E- 69 Ol 
0360- po Us 
0362- 
U364- DO O04 
0360- CoO FE 


A eT INT 


60 POKE AD,P1: POKE AD + 1,P2. POKE AD + 2,T1: PUKE AD + 3,T2:AD = AD +4 0368- FO SE 
70 IF fT THEN 30 3 036A- CA 
100 CALL 799. END 036B- = BO -F:iLl 
130 DATA 29 ,300,32,200,40,100 41,600 036D- 8S 
140 DATA 36,100,39,100,37,100,32,200,31,160,30,550,0,50 036E- DO EE 
150 DATA 30,300,32,200 34,100 ,36 ,600 0370-  2¢ 30 CO 
160 PATA 34,100 ,32 ,100,31,100,30,200,39 100,37 600 d379 46 76 D4 
500 DATA 0,0 U37o- A6 Fi 
1000 DItH NC 50) O37 3 AG FC 
1010 FOR I = 0 TO 50: READ N(L): NEXT I OFFA (48 GE 
1020) RETURN O37 C=. BOC OS 
O37E- C6 _~—FF 
0330- bd 04 
0352- C6 FE 
0384- FO 42 
0386- CA 
ape 0387- DO Fl 
Listing 6. Gente ORE 
2000-- AY _~UD LDA #$00 | DISENABLES STROBE TO SPEAKER U38A- DO -LE 
2002- 8D 1A 03 STA $§031A , IN SUBROUTINE $0300 036C- — 2C 30 CO 
2005- AS: FE LDA $FE O38F- 4C 92 03 
2007-35 EE STA SEE 0392- AG FD 
2009- AS FF LDA $FF 0394-  A4 FC 
200b- ss 85. EF STA SEF O370— (69-0) 
20Ub-—s AY Ol LDA #$01 O39s- DO 08 
200F- &5 Fi STA 3FE 039A- —COsOFF 
2011- AD 16 LDA #816 039C- pO 04 
2013-85 ~FF STA SFF U39E- C6. FE 
2015-20 58 63.) «JSR «=$0358 , PLAY* NOTE FOR #$16 UNITS OF TIME U3A0- FO 20 
2018- 38 SEC O3A2- CA 
2019- =A5 EF LDA’ SEF O3A3- =O -F1 
201B- £9 16 SBC #516 O3A5- 88 
201LE- BO 04 BCS $2023 O3A0- DO EE 
201F- C6 EE DEC SEE O3A8- EA 
2021- FO 19 BEQ $2040 U3BAY- BA: 
2023- 85 EF STA SEF U3AA- = 4C_ AD 03 
2025- Ad Ol LDA #$01 O3AD- AG ED 
2027-85 FE STA $FE UO3AF- A4 FC 
eoeo— > AY OB LDA #50B O3b1- 69 UL 
2023- 85 FF STA SFE O383- DO U8 
202D— 20: 00 03. «JSR =©$0300 , SILENCE FOR #$0B UNITS OF TIME . DSBS, \ CORE 
2030-38 SEC O3B7- DU U4 
2031- AS EF LDA $EF O3B9- C6 VE 
2033- = E9 OB SBC #S0B O3BD- FU OR 
2035- BO 04 BCS .$203B 03C3- CA 
2037- C6 EE DEC SEE O3BE- DU Fl 
2039- FO 05 BEQ $2046 03C0- $8 
2u3B- 85 EF STA SEF O3Cl- DO EX 
203D- 4C 0b 20 JP §200D O3C3- «EA 
2040- = Ad CO LDA #$CO , RE-ENABLES STROBE TO SPEAKER O308—., BA 
2042-80 1A 03 «STA $031A , IN SUBROUTINE $0300 O3C5-  4C/5A 03 
3 2045- 60 KTS O3C3- 60 
| Listing 7. Listing 8. 


APPLE MUSIC 


to QO V within 100 milliseconds. After 
this time the next strobe does not 
have any effect on the loudspeaker, 
even though the controlling flip-flop 
does change its state! Finally, low 
notes with an uneven mark-to-space 
ratio may sound different depend- 
ing upon whether the longer of the 
two delay times between loud- 
speaker strobes corresponds to O V 
across the speaker or not. 

This article extends the musical 
package presented last month to 
include a method of altering the 
basic waveform of the notes pro- 
duced and thus a corresponding 
change in the tonal quality of the 
music generated by the Apple. It 
also warns of possible pitfalls that 
may be encountered at lower fre- 
quencies due to hardware con- 
siderations. I hope these articles will 
catalyse readers into doing further 
musical experiments on their Apples 
— | certainly shall be! 
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DRAGON, BBC, SPECTRUM DEALERS 


BBC B Computer 1.2 OS. £399.00 
A - B Upgrade Kit £60.00 
D.O.S. Kit £95.00 
1.2 ROM £8.00 
Tatung RGB Monitors £260.00 
Sanyo Green Monitors £97.00 
Disc Drives from: £228.00 
Joysticks (Pair) £13.00 
Wordwise Word Processor £39.00 
View Word Processor £59.00 
Acorn Electron (Phone Availability) 

All connectors, plugs and sockets for BBC, ribbon cable, discs 
C.20 C.15 C.12, cassettes etc. in stock. 

Centronics Printer Cable (BBC & Dragon) £12.90 
R.T.T.Y. Program for BBC B £7.50 
R.T.1T.Y. Circuit Board including instructions £6.30 
Cassette Recorders from: £18.90 


Computer Dust Covers £3.00 
Star 510 Printer (Inc. Cable) £299.00 
CP80 Printer (Inc. Cable) £299.00 
Printer Cable (BBC or Dragon 32) £12.90 


Epson RX80, FT, FX80 

DRAGON SERVICE CENTRE 
Dragon 32 £175.00 
Dragon 32 Disc Drive (Inc. Controller) £275.00 
Joysticks (pair) £19.00 
ZX Spectrum 48K £129.00 
ZX Spectrum 16K £99.90 


(Phone avaiiability) 


Wide range of software for BBC, Dragon 32, ZX Spectrum etc. 

Please send SAE for full list. Post and package on small items 50p. 

All available mail order. Access and Visa. 24 hour phone. All prices 
include VAT at 15%. 


S P ELECTRONICS 


48 Linby Road, Hucknall, Notts NG15 7TS. 
7 TEL: Notts (0602) 640377 


ROSE SOFTWARE 


EDUCATIONAL SOFTWARE 
FOR THE SPECTRUM 
(16K or 48K) 


YOUNG LEARNERS 1 


4 programs for the young 
computer user: abacus, 
telling the time, shopping 
and snakes. All with 
excellent graphics. An 
easy introduction to 
computer aided learning. 





£5.95 per cassette 





G.C.E.’’O’’ LEVEL 
MATHS REVISION 
GEOMETRY 


6 programs of multiple 
choice questions, 
covering properties of 
parallel lines, triangles, 
various polygons and 
circles. All questions use 
generated numbers. An 
explanation of the correct 
answer is given. 








G.C.E. ‘’O’’ LEVEL 
FRENCH VOCABULARY 
REVISION 


Six programs on one 
cassette. The first 3 
programs test vocabulary 
under various headings: 
eg ‘‘on holiday’’. Three 
further programs: 
homework tester, 
common words and 
phrases, and irregular 
verbs. 












We have a large range of 
educational p. >»grams for 
the Spectrum and 2X81. 


Send sae for catalogue of all our products to: 
ROSE SOFTWARE, 
148 Widney Lane, Solihull, West Midlands B91 3LH 





















































Nearly 400 Programmes 





















IN STOCK 
SND easON AE 
COMPUTERS 
Telephone: Mold 56842 
M. 400 inc BASIC £115 
» 48K Lynx £225.00 
ATARI COMMODORE 64 £229 
ORIC 1 48K £139.99p 
Phone Orders Welcome on 0352-56842 
NEXT DAY DELIVERY AVAILABLE Please ring for details: 
I enclose cheque/P.O. for £ 


Ring for our Price List 
Unit 19, Daniel Owen Precinct, Mold, CH7 1AP. 
800 £299 
VIC STARTER PACK £139.99p 
Postage & Packaging FREE 
or please debit my Access Card No 
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Epson RX 80T $226+ VAT  Star510 
sa) dy O}s10) Obs a(P, Grol OD cs bi £253 + VAT Stanols 
Epson F X80 £337 + VAT CFEC P80 £255 + VAT 
Epson FX100 £485 + VAT MT8O Fay dO a 
Epson MX 1@O £390 + VAT Seikosha GP 700A &337 + VAT 


£245 + VAT 
£335 + VAT 


STAR & EPSON — THE BEST ON THE MARKET: 


Frsiyletasterotertatame rebense mee Be panna \ 


All oriniters (org a’ar- mime Ay; lame 1Ur-Ue-lalt-1-mr- Lalo mete) sal-mwahcam oy-| el) a 
Shipment is by TNT Overnight Express to your door — Please 
mar- (0 [ot Y Aan .W Maer la al-le [= a 


- Payment by Cheque, Access, Visa etc. 


Jal] olaal=10) os al gelele] alole) an OL @mn mer: lal-pd ele] at 
to most countries in the world. 


Please phone for Access or Visa buying 


details. 
Micro-Spares 


AlifzMwer-boboQoree- Belem’ sO 0m ole) rmel-Mel:t-in-be Mole Ms saan kersd, 


\\ fo) {=o} bb ames ok: bel:X-mep m@-lelebact-t- 
104-106 Hanover Street, Edinburgh EH2 1DR 
031-226 3345 
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METAMORPHOSIS CREATOR'S REVENGE 


You stumbled into the nest of the Cyglorx The creator assembled a massive army of: 
rlaleMilaremyZele ln <a mile ]alel ave me) imce) ele) e-)a) 4: robots and insects to take#evenge on the 
guarding the Cyglorx eggs. You think you _ earth. Destroy.ins@ets get treasures, and get 
have everything under control and then the the.neutron bomb/deactivator. Battle 
eggs start hatching. Commodore 64 version robots and destroy the neutron bomb 
features 4 different screens. before it annihilates your city. Miss and you 
VIC 20 - COMMODORE 64 must face the mutants. Features 4 different 
£7.95 a screens. 
| COMMODORE 64 
£7.95 


OTHER GAMES AVAILABLE Re 4. 
EARTHQUAKE 
WN is 


ee 


MOGUL COMMUNICATIONS LIMITED 
90 Regent Street, London WIR 5PT Telephone 01-437 3156/7 














Review: FORTH ROM 


Don Thomasson 





ZX81-FORTH 


lf you’re fed up with your ZX81 and its Sinclair 
BASIC, it’s possible to perform a bit of surgery 
and turn it into a different beast entirely. We 
review the multi-tasking ZX81-FORTH ROM from 


David Husband. 





or lay observers, one of the 

oddest things about computers 

is the way they can be 
transformed into different machines 
by changing one small component. 
For example, it is. possible to take a 
standard ZX81, fit a new ROM, and 
produce a computer specialised to 
the FORTH language. 

Is that good? Opinions may vary, 
but answers to the question need to 
be based on more than a superficial 
glance at the subject, so let us probe 
a little more deeply. 3 

FORTH “seems “tos be “the 
language of the moment, with fresh 
versions springing up everywhere. 
Unfortunately, many implementa- 


tions are rather idiosyncratic, and — 


there will soon be as many dialects 
of FORTH as there are of BASIC. 
That is a pity, because it inhibits the 
publication of source code pro- 
grams. A program written for one 
_implementation would probably be 
difficult to convert so that it would run 
on another version. The process of 
conversion might largely be a matter 
of defining new words, but that may 
need specialised knowledge. 

ZX81-FORTH is radically different 
from most of its contemporaries. For 
one thing, it provides for multi- 
tasking. At a very simple level, this 
means that it can run a foreground 
program normally, but slip away to 
do other tasks at regular intervals. It 
would be possible to run a time dis- 
play program or monitor input data 
_ from an external source concurrently 

with the execution of a main 
program. 

At a time when newcomers to 
FORTH are struggling to come to 
terms with single-task systems, multi- 
tasking may seem an unnecessary 
complication, but use of the facility is 
not mandatory. The system can be 
used quite simply in the single-task 
mode. 


THE HARDWARE 


It is easy enough to talk about fitting 
a new ROM, but the process can 
present problems. Some ZX81s pro- 
vide a socket for their ROM chips, 
some do not, the ROM being fimly 
soldered to the printed circuit board. 
The socket and the board layout pro- 
vide for 28 pin connections, though 
the normal component has only 24 


pins. The extra pins cater for the fact 
that an EPROM requires more con- 
nections than a_ pre-programmed 
equivalent — one to select program 
mode, another to supply the voltage 
used for programming. To compli- 
cate the matter still further, various 
manutacturers have different ideas 
regarding the position of the pins. 

To overcome these problems, the 
FORTH ROM is supplied with a 
socket, and — if necessary — the 
ROM pins are ‘modified’, as the 
manual puts it. It all sounds slightly 
dicey. 

Fortunately, it is possible to 
obtain ready-converted systems, and 
that might be a wiser course. The 
guarantee would not survive the pro- 
cess of home conversion. The situa- 
tion regarding the guarantee for 
converted machines needs to be 
checked. 


SWITCH ON 


The point about the guarantee came 
to mind because the review unit had 
a problem, one seen before in 
ordinary ZX81s. Due to some confu- 
sion in the sync-generating system, 
there were two overlapping displays 
on the screen. It was possible to 
carry out some experiments, but only 
with some difficulty. 

One point that emerged early on 
was that the Rubout only back- 
spaced, the original text being 
altered only when it was overwritten. 
Worse, beyond about mid-screen the 
Rubout key had no effect. Combined 
with the need to key in each letter 
separately, this made the deficien- 
cies of the ZX81 keyboard painfully 
evident. 

The second point may have 
related to the hardware problem. A 
great advantage of having the 
FORTH kemel in ROM is that it is not 
destroyed when a program runs 
amok. User extensions, on the other 
hand, are not protected, and it was 
noted that they sometimes vanished, 
perhaps due to imperfect contact 
with the essential RAM extension 
box. Incidentally, another make of 
extension was tried, but that des- 
troyed the display completely, yet 
both extensions worked on another 
ZX8 1. 

A key problem (literally!) was that 


the ZX81 keyboard does not nor- 
mally generate certain characters 
essential to FORTH. There is no @, 
no !, no square brackets, and so on. 
A conversion table is necessary, and 
a keyboard overlay would be useful 
to remind you to press OR for!, STEP 
for @, and so on. 

These points are made as facts, 
not necessarily as criticisms. The 
rationale of using the ZX81 as a basis 
for conversion is economically 
sound, and the consequences must 
be accepted. Nevertheless, there 
was a feeling that a conversion of a 
slightly more expensive machine 
might have been preferable. 


THE SYSTEM 


Apart from the multi-tasking feature, 
the system departs from the norm in a 
number of significant ways. Instead 
of using a common stack for all data, 
separate numeric and character 
stacks are provided. There is pre- 
sumably a Retum stack as well, but it 
was not defined explicitly. 

Another difference was the use of 
a split-screen arrangement to reserve 
the upper part for editing purposes, 
while the lower half became the 
‘console’ screen. In usual FORTH 
practice there is no need for this, 
because the whole system is 
dedicated to one kind of task at a 
time. If editing is going on, the whole 
screen is dedicated to that task. If a 
program is being compiled, the 
screen only reports errors. If a pro- 
gram is being run, the whole screen 
is at its service. This straightforward 
situation changes when multi-tasking 
is In use. 

A perennial problem with 
FORTH in association with a screen 


of limited size is the way in which 


adequate amounts of source code 
can be handled effectively. ZX81- 
FORTH provides a word SCREEN, 
which allows screen areas of various 
sizes to be set up, each area having 
its own name reference. There is also 
provision for copying a screen from 
one store area to another, and with 
practice this would probably serve 
the essential needs. The STORE 
command will pass the contents of 
the editor screen to tape, and LOAD 
will restore it. This could become 
rather tedious, since a number of 
small recordings will be involved, 
rather than a single overall file. 

Because of these system charac- 
teristics, it is difficult to compare 
ZX81-FORTH directly with other ver- 
sions ol FOURTH. His said to be 
derived from TREE-FORTH, so it may 
not be completely out on a limb on 
its own(!), but it is certainly unusual in 
a number of ways. 


VOCABULARY 


A comprehensive FORTH kemel in 
Z80 code, using the normal machine 
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operating system to help out, runs to 
around 9 kbytes of store. It was 
therefore to be expected that a ver- 
sion incorporating its own operating 
system would be a tight fit in 8 
kbytes, even without the addition of 
multi-tasking. This is quoted as a 
reason for departing from fig-FORTH 
standards, but the departure need 
not have been quite so radical. 

Comparing ZX81-FORTH with a 
good fig-FORTH implementation, no 
more than one third of the words pro- 
vided by the latter are common to 
both versions, even if functions with 
the same effect but different names 
are included. The differences work 
both ways. ZX81-FORTH caters for 
64-bit products of 32-bit numbers, 
where fig-FORTH is usually limited to 
a 32-bit number length. The CASE 
structure is implemented, but in a 
way analogous to ON GOSUB in 
BASIC. On the other hand, some 
useful words are absent, or at least 
not defined in the 71-page manual, 
which is produced in A4 size on a 
good printer. 

Some of the differences stem from 
the differences in system concept, 
but all add up to the fact that com- 
munication with other forms. of 
FORTH is made more difficult than 


necessary. 
So letus sit back and consider what 


ZX-81 FORTH offers. It is certainly not 
without interest. A correspondent in 
Florida, who uses a couple of ZX81s 
(he calls them TS1000s, of course!) to 
run a local radio station might well 
tind the multi-tasking useful, though 
he would probably have to write 
some machine code definitions to 
access the input/output functions. 
The apparent absence of such func- 
tions is a pity, because FORTH is 
well-suited to control processes act- 
ing on extemal equipment. 

Taking a thoroughly down-to- 
earth approach, let us pose the key 
question: Why should you decide to 
buy ZX81-FORTH? The first part of 
the answer is you can begin to 
experiment with FORTH for just 
under £75. (£45 ZX81 ‘starter pack’ 
and -£28:75 for the 1ROM). If you 
decide that FORTH is not for you, 
BASIC remains available, via a 
reverse Conversion. 

That will only be valid, however, 
it you have no computer to start with. 
If you have a ZX81, you can convert 
it for less than £30. If you have a 
Spectrum, you can convert it for £15, 
the cost of a FORTH tape, and that 
applies equally to a number of other 
machines. 

Leaving aside the economics, 
ZX81-FORTH~ has. two _ attributes 


which make it unique: the kernel in 


ZX81-FORTH 


ROM and the provision for multi- 
tasking. These, frankly, are the two 
principal reasons which justify its 
existence. If it could have been kept 
nearer to other FORTH standards, 
there might have been more reasons. 


CONCLUSION 


The concept behind ZX81-FORTH is 
good, but the actual implementation 
could be better. For those who wish 
to explore FORTH, there is a danger 
that it will lead them into a dead 
end, with problems of communica- 
tion with other FORTH users. On the 
other hand, those who have a par- 
ticular application in mind, and who 
have the knowledge needed to 
make maximum use of the system, 
may find that ZX81-FORTH is exactly 
what they need. 

The ZX81-FORTH ROM is avail- 
able at £28.75 inclusive from: 
David Husband, 2 Gorleston Road, 
Branksome, Poole BHI12 I1NW. 
(Callers by appointment: telephone 
(0202) ‘764724, 6-7 pm, Mon-Sat). 
Converted machines, price to be 
announced, from: 
Densham Computers Ltd, 329 
Ashley Road, Parkstone, Poole, BH14 
OAP. (Telephone (0202) 737493). 








MICROTANIC COMPUTER SYSTEMS LTD. 
MICROTAN 65 40 O7WER COMPUTER 15 AS PERSONAL! 





“MICRON 









For less than £60 you can start building your own Computer 
that truly suits your needs and, of course, eventually far more 
superior to any Computer available off-the-shelf. 


FLEXIBLE & EXPANDABLE SYSTEM — 1K to 256K! “SSROTAN WORLD 
Just look at the options: Ie i ei 

1 DISK CONTROLLER 7 MASS EPROM STORAGE BOARD 

2 REAL TIME CLOCK 8 INDUSTRIAL CONTROLLER BOARD 
3 EPROM PROG. CARD 9 40K RAM BOARD 

4 SOUND BOARD 10 HIGH RES. GRAPHICS 256x256 

5 SERIAL 1/0 BOARD 11 PRINTER FACE BOARD 

5 6 PARALLEL 1/0 BOARD 12 ASC11 KEYBOARD 


Board with components 
(built or kit form) 


MEE . FULL RANGE OF SOFTWARE | 
Ze ee : Languages available: Machine Code. biol 
-. A tne Sat Assembly, Basic, Forth, oi apes 







MICROTAN 65 comes in kit form, complete with manual, full 
instructions, board with components, (kit form or fully built) 
our full back-up service, and your own Microtan World 
Magazine available on subscription. 





















e and Pilot 










Post to: 
MICROTANIC COMPUTER SYSTEMS LTD 






16 UPLAND RD. LONDON SE22 
Tel No. 01-693 1137 


| Please rush me my starter kit: | 
' (Please tick) | 
he staat form — | will build myself £59.95 

| © Fully Bui £69.95 | 
| C) Complete system wall chart | 
| | enclose my cheque/P.O. for£ 

| 












» Ate Full jes une OR te Se ERE Raga eRe | 
instructions 
manual OPT Se hi CL SED Si Be eS ee a 
PIS SENS dpe dn ote Sa S84) Geman ia ale | 


MICROTANIC COMPUTER SYSTEMS LTD 
SHOWROOM: 16 UPLAND RD 
DULWICH, LONDON SE22 

TEL: 01-693-1137 


Also available from: 
Waltham Forest Computer Centre | 
889 Lee Bridge Rd. 

Nr Whipps Cross, Walthamstow E7 
Tel: 01-520 7747 


MAIL ORDER: 
235 FRIERN RD. DULWICH 
LONDON SE22 
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DRAGON 32 


Hardware and Software 


Available Now — Dragon 32 Expansion Unit 


High quality design allows simultaneous connection of disc 
drive and/or up to four cartridges. 


e Gold-plated connectors used throughout. Fully pro- 
grammable cartridge selection. Allows High Speed Data 
Transfers. Easy to use. Instructions included. 


e Price £48.00 + VAT (Please add £2.50 post & packing) 


Coming Soon A/D, D/A board, Eprommer, Graphics 
Board, etc. all fully compatible Dragon 32. 


For Dragon 32 














e Master Chess — Software Magazine for Chess 
Enthusiasts. Study and enjoy the games of the masters, 
past and present. Introductory selection with detailed audio 
commentary cassette. 


e Price £8 + VAT (plus £1 post & packing) 


Send large SAE for details of future issues of Masterchess, 
subscription rates and our full range of Dragon 32 hardware 
products. 


Cheques/Postal Orders payable to: Prelectronics Ltd. 
Send to: Prelectronics Ltd., Albro Castle, St. Dogmales, 
Dyfed, Wales. 


\ 
| 
| 


COMPUTER ROBOTICS 
TRAINING | 


FULL TIME COLLEGE COURSE 


SUITABLE FOR APPLICANTS WHO WISH TO 
ENTER COMPUTER SERVICE OR RELATED 
INDUSTRIES — HIGH PERCENTAGE OF 
PRACTICAL COURSE WORK 


15 MONTHS 
B TEC Certificate in Computing Technology 


. 9 MONTHS | 
B TEC Higher Certificate in Computing Technology 


Subjects: Foundation Electronics, Digital 
Techniques, Microelectronics, Microprocessors, 
Microcomputer Based Systems, Industrial 
Robotics, Machine Code & High Level Pro- 
gramming. 
Shortened courses can be arranged for applicants 
with previous knowledge. 


Courses commence Jan, April and Sept (Higher 
Cert Sept only). Prospectus from: 


6) [ele], Bam ens fe), | lor mele) RM 1 e] Sar.) ae1-7/;)) 
20 Penywern Road, 
Earls Court, London SW5 9SU. 
Tel: 01-373 8721 













































ORIC AND SINCLAIR COMPUTERS 


Oric 1 computer 48K £143 (£141) £151. 
Oric colour printer £134 (£123) £140. 
Sinclair Spectrum 48K £131 (£131) 
£143. Spectrum 16K £101 (£105) £117. 
32K memory upgrade kit for 16K 
Spectrum (issue 2 only) £31 (£28) £30. 
Fuller Master Unit for the spectrum 
including speech unit, sound 
synthesizer, amplifier and joystick port 
£56 (£56) £62. Fuller full sized FDS 
keyboard for the spectrum with proper 
space bar £52 (£52) £62. ZX printer with 
5 free rolls paper £41. ZX printer alone 
£36 (£38) £50. 5 printer rolls £13 (£16) 
£21. ZX81 £37 (£37) £47. Special offer 
pack ZX81 computer + 16K ram pack + 
game tape £49 (£55) £65. ZX8116K ram 
packs £31 (£28) £30. 





COMMODORE COMPUTERS 





Commodore 64 £204 (£184) £204. Vic 
20 £104 (£97) £117. Convertor to allow 
most ordinary mono cassette 
recorders to be used with the Vic 20 
and Commodore 64:- built £9.78 (£9) 
£11, kit £7.47 (£7) £9. Commodore 
cassette recorder £43 (£44) £50. 1541 
Disc drive £233 (£209) £234. 1525 
Printer £235 (£220) £245. 1526 Printer 
£350 (£330) £360. 





















SWANLEY ELECTRONICS 









ACORN COMPUTERS 


Electron £203 (£209) £229. BBC Model 
B £424 (£388) £408. Kenda double 
density disk interface system for beeb 
£139 (£125) £135. We stock the whole 
range of Cumana disc drives for the 
beeb e.g. 100K single £230 (£220) £240, 
Double 2 x 400K £625 (£560) £580. 














Epson RX80 £326 (£309) £340. Epson 
RX80F/T £346 (£316) £346. Shinwa CTI 
CP80 £293 (£271) £312. FX80 £440 
(£408) £438. Epson MxX100/3 £494 

) £495. Seikosha GP100A £234 
(£219) £254. Oki Microline 80 £223 
(£207) £248. Oki.Microline 84 £831. The 
Ultra 21 combined daisy wheel and 
electric typewriter £438 (£415) £445. 
The brother EP22 combined matrix 
printer and electric typewriter £173 
(£166) £186. Juki 6100 proportional 
daisy wheel printer £423 (£404) £434. 
MCP40 colour printer £134 (£123) 
£140. Star STX80 thermal printer £165 
(£159) £169. We can supply interfaces 
to run all the above from Sharp 
computers £58 (£52) £55. 





VIDEO GENIE, UK101 and 
SUPERBOARD 











We still support these gorgeous 
machines. Write for our tempting list of 
add ons. 


Dept CT, 32 Goldsel Road, Swanley, Kent BR18 8EZ, England. 
TEL: Swanley (0322) 64851 
Nothing extra to pay. All prices are inclusive. UK prices are 
shown first and include post and VAT. The second price in 
brackets is for export customers in Europe and includes 
insured air mail postage. The third price is for export 
customers outside Europe (include Australia etc) and 


includes insured airmail postage. Official orders welcome. 


TEXAS TI994A 
NEW 


Adventure No. 1 


Hangman 
Address Book 
Home Accounts 
Optical Illusions 
all at £4.50 each 
including P&P 
Buy any 2 and receive 


Optical Illusions FREE 


LINCO DATA 


30 BROWN CRESCENT, 


SUTTON-IN-ASHFIELD, 


NOTTINGHAM NG14 7GY. 
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Software: Two simple utilities PET UTILITY PROGRAMS 


ORIGINAL VALUE FORMATTED VALUE 


M. C. Hart 


TWO PET UTILITIES 



























; | | | . bikes a 44.7437833 44.7438 44.74 
We proudly present a pair of PET utilities. There’s 145608437 ost! de 
a PRINT USING facility for the formatting of -2927.99181 -2927.9918  -2927.99 
numerical data, and a program protection routine | 417;325223 Beir emer es 
that should fool most of the people most of the ee 
time 7.5962991 7.5963 7.60 

. i4.9696188 14.0696 14.07 
760.401918 760.4019 760.40 
ow that PET computers inone BASIC IV(12"screen) machine, each apnea oe pays or 
Nos or another have been subroutine call takes some 0.075 0316467338 0.0316 0.03 
with us for some five years and seconds, some 13 numbers to the 0416842159 0.0417 0.04 
a fair volume of material has been second, and | believe that it com- bet : 
published about them, I speculated pares very favourably with the Sere Some printout using 
upon the type of articles that pro- machine code routine in the o (*). 
grammers of CBM machines most like _COMMAND-O chip which takes on routine, access time needs to be fast 
to read. Having given the matter average 0.047 second. (The latter, to aid speed of execution. This is 
some thought, I suspect that many incidentally, will not attempt to pro- ensured by defining them in the vari- 
readers will fall into either or both of cess numbers in exponential format able list before other program vari- 
the following categories: fully and for certain numbers is ables are used. The interpreter 
@ those who enjoy elegant program- actually inaccurate, so 0.001 to three therefore does not have to search far 
ming that makes use of CBM decimal places is processed as to find the subroutine variable names. 
specialties, for example ROM —03.000! Commercial or scientific Notice also that variable names 
routines. users of the PRINT USING routine on rather than raw numbers are utilised 
@ those who would like a ‘utility’ to the COMMAND-O chip be wamed — — this means that some of the con- 
complement the existing ROM you may be better off with my version time spent in converting num- 
routines, which are now starting to routine.) bers to the format in which they are 
look a little threadbare when com- Here are a few words of explana- stored internally is saved. 
pared with what is available on more __ tion for those who are interested in Line 11 constructs a small look-up 
up-to-date machines such as the the construction process. Line 10 table (not dimensioned unless you 
BBC. initialises variables as near to the intend more than 10 places of 

Two routines are presented here, start of the program as possible. As decimals!) which contains the powers 
each of which has attempted to be each of these variables is goingtobe of 10 at each point (ie. 1,10,100 etc). 
brief yet practical. The first routine is used constantly in the formatting sub- —_ The reason for this is that exponentia- 


a PRINT USING facility which was an 
amazing omission on machines inten- 
ded for commercial use, while the 
second is a fairly simple way to give 
program protection to cassette based 


1 PRINTCHRS(147)TAB(12) 
software. 2 PRINT"PRINT USING DEMO": PRINTTAB(13) 
PRINT UJ S| N G UTI UI 3 PRINT" ==s=============5" ; PRINT: PRINTTAB( 15) 
Y 4; 
5 PRINT"BY M.C.HART":PRINTTAB(15) 
While ‘quick and dirty’ methods of 6 PRINT"==========s"; PRINT: PRINT:FORZR=1 TO 1500:NEXT 
* rae i y w Ww 
rounding to a specified number of 7 PRINTCHRS(147)CHR$(18)"ORIGINAL VALUE FORMATTED VALUE 
. é 8 PRINT:PRINT | 
digits exist, | was anxious to write a oo 
routine which was economical, fast ZR=0:Z1=0:2$="": ZH=.5:ZD=0:Z=0:ZF=11:ZZ$="000000": ZFS=" " 
and performed the following Z(0)=1:FORJ=1T010:2(J)=Z(J-1)*10:NEXT:REM TABLE OF ROUNDING NUMBERS 
functions: 
@ to round both positive and nega- REM Z = ORIGINAL NUMBER 
tive numbers correctly, avoiding the REM Z$ = OUTPUT STRING 
fogue CIYors a eS eva ua O REM ZH = HALF-ADJUST(0.5) 
will introduce when processing cer- REM ZD = NO OF DECIMAL PLACES 
tain numbers by conventional means em ee te 
by using the INT(X*1000+0.5)/ 1000 REM Z()= TABLE OF ROUNDING NUMBERS 
approach). : 
@ to process numbers less than 100 FORJ=1T015:Z=EXP(RND(1)*14-6) : IFINT(J/4)-J/4=OTHENZ=-z 
+0.01 which would otherwise be 110 PRINTZ;SPC(15-LEN(STRS$(Z))); 
expressed in exponential format. 120 ZD=4:GOSUB60000:REM NO CARRIAGE RETURN 
; i 130 ZD=2: : : 
® to put in leading zeroes for values ibe ae role Oneal Seer ee ae 
between +1] and —1. 150 : 
@ toadd a fractional part of trailing 160 : 


. 60000 ZR=Z(ZD) :21=INT(ABS(Z)*2R+ZH) /ZR: IFZD=OTHENZ$=STRS(Z1) :¢0T060020 
zeroes to ensure consistency with 60010 Z$=STR$(INT(Z1))+"."+RIGHTS(ZZ$+MID$(STRS(INT( (Z1-INT(Z1) )*ZR+ZH) ), 2) , ZD) 
ee ee 2.3 oe PRINTRIGHTS$(ZF$+LEFTS(STR$(Z<0) ,1)+MID$(Z$,2),ZF); : RETURN 

ecomes 2. o three decima 


places. 60040 : 

The routine presented here does 
all of these things and has attempted 
to optimise on a combination of Listing 1. The PRINT USING 
speed and compactness. Timed ona program. 
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Software: Two simple utilities 


tion is expensive of processor time — 
the look-up table saves some 40% of 
the processing time when compared 
with the traditional method of 
exponentiation in arriving at round- 
ing numbers. Because of the way in 
which numbers are stored internally, 
exponentiation may introduce other 
small errors as well. 

— Lines 20-28 document the func- 
tion of the variables in the routine — 
all of these are preceded by Z so that 
the user can reserve these exclusively 
for the use of the subroutine to avoid 
the risk of corruption. Lines 100-140 
are a small ‘driver routine to generate 
random numbers and process them. 
Notice that all one has to do is to 
specily the number of decimal places 
and then call the subroutine but if 
used in a conventional program one 
would have to copy the number to be 
processed into the variable Z before 
the call. The number to be processed 
is printed in the last line of the sub- 
routine (again to save time) and has 
a delimiter to keep output on the 
same line for further processing. If you 
intend your next call to the sub- 
routine to be on a new line then in the 
driver program remember to force a 
new line atter the last subroutine call. 

If speed is the absolute essence 
then it is possible to speed up the 
program even further. If you know that 
you are not going to process any 
integers then you can cut out the con- 
dition at line 60000 altogether (IF ZD 


‘=0...) and this might save some 


precious microseconds. To process 
negative numbers in a slightly faster 
way then one can introduce a new 
line as follows: 


60015 IFZ<@ THEN Z$ = "-" + 
MID$(Z$,2) 


and cut out the complex (ingenious?) 
way of processing the negative sign 
in the last line. This is the middle term 
of the concatenated string, ie 
LEFT$(STR#(Z<0),1): make this 

latter term merely Z$, so that the last 
line reads: 


60020 PRINT RIGHTS (ZF$+Z$,ZF);: 
RETURN 


Attempts to go much faster in BASIC 
may well be thwarted by the speed of 
one’s printer rather than anything else 
and the virtues of the three-line ver- 
sion are that it is quite easy to type in 
if APPEND facilitates are not readily 
to hand. 

Finally, you might like to have an 
indication of the output string being 
too long for the specified field length. 
This is actually very easy to program 
in a new line: 


60015 IF LEN(Z$)<ZF THEN PRINT 
LEFTS ("#RRARREAREAEAEEE” TR) 5: 


RETURN 
and in this case your number would 
not be printed but the whole field 
would be filled by a symbol. Yet 


another approach is to ‘tag’ a symbol 
such as a % sign to the offending 
string and print that out instead. 


PROGRAM 
PROTECTION 


No program can ever be completely 
protected but I offer below a machine 
code subroutine which offers a 
measure of protection to cassette- 
based software. Its deterent effect is 
probably not very great for those 
whose knowledge of the intemal 
routines of the PET is of a moderate > 
standard, but! am sure that it will 
serve its purpose by providing a fair 
degree of protection. 

In any protection program one 
wishes that the program will run nor- 
mally, but that it cannot be LISTed and 
particularly that it cannot be SAVEd. 
This is achieved in the program 
offered here in the following way: 
when the program is RUN the first 
statement is a SYS call which alters 
the pointers to the start of BASIC, dis- 
ables the stop-key (but in a way 
which does not disable the clock so 
that is still accessible for timing pur- 
poses), alters the CHRGET routines 
so that direct commands (except 
RUN) are ‘rewarded’ by resetting the 
machine, and finally sets a flag to 
show that the program is correctly 
entered. A further check routine is 
written which can be accessed 
periodically to ensure that the pro- 
gram is entered by the conventional 
route and any would-be ‘burglar’ will 
be rewarded by a machine reset 
which clears the contents of most of 
the RAM, including the main 
program. 


Assuming the program you wish to 


protect is already resident in memory, 
try to ensure that the program cannot 
be ‘crashed’ in any evident way, eg 
by preventing division by zero or null 
INPUTs. Then make the first line: 
LISYS1GAS*FRF 0S. exactly ‘70 
asterisks 
leaving no spaces between | and 
SYS or SYS and 1048 and then typ- 
ing a single set of quote marks. The 
space provided by the asterisks is 
going to be filled by machine code 
eventually. Then periodically 
throughout the program use the 
following program line (it need only 
be typed once and then duplicated 
when necessary by giving new line 
numbers): 


XX SYS655:REM"" (carriage return) 


Now place the cursor over the second 
of the quote marks and use the 
INSERT cursor to open up a gap of 
some 15-16 spaces or more then fill 
these spaces up to the last quote 
mark with DELETE signs (reverse T in 
appearance) and cursor right over 
the final quote mark when you come 
to it. Finally type shifted left square 
bracket for BASIC IV ea symbol), or 








q 
EK 


shifted L for BASIC II ( symbol) — 
these symbols prevent listing while 
the preceding delete signs make the 
line practically invisible (except for 
the final quote mark which remains). 
This operation sounds tricky but is 
actually very easy once you have 
performed it a few times. Having got 
one line correctly entered then dupli- 
cate a few more so that they are scat- 
tered throughout the program. 

To enter the machine code, follow 
this procedure. Type SYS4 to break to 
the monitor and then M O40B 0451 
checking that byte 0451 is a O. If not, 
then you have probably made a mis- 
take with the asterisks, so exit from 
the monitor and adjust until you get it 
right. Then type in the nine lines of 
machine code (70 bytes) from Listing 
3a, not forgetting to press Return at 
the end of each line. Similarly, while 
still in the monitor enter the lines of 
























































Listing 3. (a) First machine code 
data for BASIC IV machines. (b) 
Second machine code data for 
BASIC IV. (c) and (d) are the cor- 
responding data for BASIC II 
machines. 


EERE PE ETE eA EE 
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code in Listing 3b by typing M 028F 
02A7, thus putting this piece of code 
into the part of RAM which is actually 
part of the first cassette buffer. 

Having put the machine code into 
the program that we wish to protect, 
we are now ready to SAVE it — but in 
a rather novel way and with one or 
two twists’ to deter predators! We 
obviously wish to preserve the code 
that we have put into the first cassette 
butter. However, if you have any 
knowledge of the PET operating sys- 
tem, you may know that every 
address in the first cassette buffer 
from O28F to 03839 has a $20 written 
into it atter a ‘normal’ SAVE. We are 
going to exploit this knowledge 
because there is a way of saving the 
first cassette buffer, but most people 
do not know it and when they attempt 
to SAVE a program they will overwrite 
the machine code routine without 
which the program will crash! 

This is how we SAVE the first 
cassette butfer routine. First of all, 
make up a name for your program 
and allocate it to a variable such as 
A$. It is very important that your 
name is 16 characters long and that 
your final character is a shifted — 
space. You can check that your 
character is correct by typing PRINT 
ASC(MID$(A$,16)) and you should 
receive the answer 160. If you do not 
then retrace your steps at this point. 


To save the machine code, we 
pop it into another variable such as 
B$ with the following direct mode 
command: 


BS=""; FOR J=0 TO 24: BS=BS + 
CHRS$ (PEEK (655+J)): NEXT 


Finally concatenate the two with A$ 


= A$ + BS and then SAVE A$ (that's . 


all!). You will see some weird effects 
on your VDU as machine code is 
interpreted as graphics symbols and 
some of the name may appear to be 
corrupted — but fear not, it will not 
reappear when reloaded and to all 
intents and purposes will appear as a 
‘normal’ program. 

Now when the program is loaded 


back again the name appears as nor- 


mal but a LIST attempt will fail 
(actually the first line will be listed but 
it will be instantly deleted and you 
should be able to observe a momen- 
tary flash but not sufficient for you to 
read). A RUN command will now run 
the program quite satisfactorily and 
you can repeat this with a similar 
RUN, but the machine code ensures 
that LIST in direct mode will reset the 
machine once the program has suc- 
cesstully RUN. If you want to save a 
back-up copy of the protected pro- 
gram, you must do it after the pro- 
gram is LOADed but before it has 
been RUN. For back-up purposes in 
which you preserve the same pro- 
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gram name then all you need to do is 
the following: ~ 


AS="": FOR J=@0 TO 40: AS=AS + 
CHRS (PEEK (639+J)): NEXT 


followed, of course, by SAVE A$. 

By now, you may be able to 
appreciate how the several parts of 
the machine code works. Once the 
program has been RUN then a LIST 
command will reset the machine. 
Before the program has been RUN 
then the program cannot be listed 
because the first line is made invis- 
ible and the three zero bytes are 
inserted to ‘fool’ the PET into thinking 
that the program is at an end. If an 
intrepid hacker breaks into the pro- 
gram then the ‘invisible’ SYS calls will 
stop the listing with a SYNTAX 
ERROR and the SYS calls themselves 
will ‘reset’ the machine if they detect 
that the program name does not con- 
tain the invisible shifted space 
character. A call into the first 
machine butfer with no machine 
code in it will crash the machine, so 
preventing a successful RUN. Even 
so, these protection devices which 
might appear to be complex only rely 
upon a certain degree of ignorance 
and no doubt can be circumvented 
by those in the know. It might be an 
interesting exercise to ‘protect’ a pro- 
gram and then offer it to friends to see 
if they are able to ‘crack’ it. 
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Opinion: Reader's letters 


PRINTOUT 











PRINTOUT 





I was attracted to the August 
edition of Computing Today for its 
article ‘Problem Page’ for the 
Spectrum, but I am quite 
disappointed regarding the section 
on Prime Numbers. 

In wht I believe is correctly 
called the ‘the sieve of 
Eratosthenes’ the method is to cast 
out multiples of primes a the 
theory states that all non-primes 
are multiples of primes; it is also 
described as the ‘uniqueness of 
factorisation theory’. 

Although Don Thomasson 
refers to this method he does not 
use it in his program, falling back 
upon the INTeger test for prims; 
an adequate but slow process. 

I enclose a listing that correctly 
uses the (three times) faster 
method. It also includes ‘2’ in the 
result as this is a prime also. 

Lines 90 and 100 set up an 
array to extract al] the prime 
numbers below the value ‘x’. Line 
110 sets loop ‘i’ for 2TO SQR x. 
Line 120 converts the array to ‘I’ 
for all multiples of ‘i’ including 
those controlling the first loop. 

The result is that the first run 
through converts 4,6,8 10, 

12 14,16,18, etc; the next 
additionally casts out 9,15,21,27, 
etc; then 25,75 etc; followed by 
49 77 etc as 2,3,5,/ are 
successively used as values for 1’. 

It only remains to examine the 
array and print out the elements 
that are still set to ‘O 

I trust you find this helpful. 
Yours faithfully, 

John A. Mason, Frome. 


18 REM KEKKEKKKEKEKEKKEKEKEKKKEKKKEKKKEKKKKEK 


20 REM * PRIME NUMBERS 
30 REM * Sieve of Eratosthenes 
48 REM * J A Mason 


54 REM KEEKKEKKEKKEKKKKKEKKKKKEKKKKKKEKK 
10@ INPUT "Number below which prim 


es to be extracted ";x 
118 DIM n(x): LET p=@ 


120. FOR t=2: TO. SOR: x7 TE nti) <8 


THEN GO TO 1498 


130 FOR j=i*i TO x STEP i: LET n(j 


)=l: NEXT j 
140 NEXT i 


150 FOR i=2 TO x: IF n(i)}=@.-THEN -P 


RINT TAB p;i;: LET p=pt8 
160 NEXT i 


The program for the Dragon 32 
in your September issue to 
generate characters is an excellent 
program. I was able to type it in 
my TRS-80 Color Computer and 
get it to work straight away. I have 
been using it since to generate 
characters for use with other 
programs. 

I did find one small error in the 
program. Line 435 which is used to 
generate the @ character in the 
graphics mode is incorrect (at least 
I couldn't get it to work properly). 
I corrected the line as follows: 


435 R$(64)="BM+ 6, 0;L4H2U2E2 
R2F2D1G 1L2H1E1R1D2” 


This information may be of use 
to your other readers. 
Yours faithfully, 
Charles S. Nichols, 
Teddington. 


Could you please bring to the 
attention of your readers that as a 
result of the increasing number of 
followers of that super adventure 
program on the Oric-1 called 
‘Hells Temple’ from Kenema 
Associates, that we are forming a 
fan club. The object of the club is 
to spread our gospel amongst 
other Hells Temple players, to 
meet, correspond and generally 
mix it with others who have dared 
to enter the Temple and got the 
bug! 

‘m sure we would all 
appreciate your kind assistance. 

By the way, our club has been 
officially approved by Kenema 
Associates Limited. 

Yours faithfully, 
Dopple-Ganger. 


(*Hmmm... Well, I suppose it takes 
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Printer Interfaces 
: Available to fit most micros: 
Electron, Spectrum, Atari, Commodore 64 incl FREE 
| ALL AT £39.95 (inc VAT) 
. | RING 0506 31605 for details 
FREE DELIVERY 
| selection of Disc Drives at bargain prices from £135 
(inc VAT) to fit BBC, Tandy, Nascom etc. 
MICRO RESEARCH LIMITED (Freepost) 
| Industrial Unit 6, Knightsridge East, 
5 | Livingstone EH54 8RA, West Lothian. 
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." It is impossible to 
~ tell you everything 
: ae the 50 games on : 
. CASSETTE - 50 but they ncis 
* many types such as maze, arcade, 3 
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EXPRESS DELIVERY - 
ORDER NOW 

















For Sharp 


\50.GAMES ON — CASSETTE. 


DRAGON ‘BI BICIT) ‘Spectrum : ‘@appic™ ATARI ORIC-1° ‘ZX81. VIKR0 - 


eee eee 





Computer 








, ir rae, 


95B Blackpole Trading Estate West, Worcester 
Tel: (0905) 58351 












Please send me by return of post, Cassette 50 at £9.95 
per tape. | enclose a cheque/postal order for 


| £ | made payable to 


Cascade Games Ltd. 
Please debit 
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to suit most tastes in Camu di ag nomena alee pis RT BR Mg 2 my ie PRESEN) Peni ECW ll lea? OMIM UR VT | i 
game playing. . PRES i sD) Eh ein a Serie Lt! L— 
CASSETTE - 50 will appeal to SPECTRUM ORIC-1 ZX 81 VIC 20 : 
people of all ages and the games cue eearavetin o ——' pBC ap DRAGON ATARI APPLE 
. will provide many hours of ~-- -° : j 
, entertainment for all the family at ~— Post Code —_- 4 ait Cascade Games Ltd., 
a fraction of the lca: of other Bs Suite 4, 1-3 Haywra Crescent, Harrogate, 
computer genes. 1 Country —__________— oe cascade North Yorkshire, HG1 5BG. England. i 
Dealers & Stockists enquiries welcome. =e" — Telephone: (0423) 504526. er tie 
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Software: An OLD command 


Tony Cross and Phil Cornes 








PROGRAM RECOVERY 


ON THE 


COMMODORE 64 


Are you sitting comfortably? Then we'll begin. Like 
all good bedtime stories, this has a nasty 
beginning and a happy ending. 


rae 
4 
y 
y 


YT 
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Y 
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nce upon a time there were 

two programmers called TC 

and PC. One day they were 
happily programming their Com- 
modore 64. When they had finished 
typing in a rather long program PC, 
who was always been a bit hasty, 
said “Go on, TC, type RUN and let's 
see if it works!” So TC typed RUN. 
After a few seconds the screen sud- 
denly went blank and the keyboard 
stopped working. “Oh no!”, cried TC, 
“It's hung on us! The only way out is 
to turn the power off”. PC looked 
worried. “If we do that”, he said, “we 
will lose the program we have just 
typed in!”. “Oh dear’, they moaned, 
“toh dear’! 

(ao on — be honest — how many 
times has this happened to you? It's 
surprisingly easy to do on the Com- 
modore 64 because so many of the 
sound and graphics facilities have to 
be POKEd in. On wrong number in 
a POKE statement could lead to just 


64 





this sort of problem. One some 
machines you can recover from this 
problem by pressing a reset key 
which resets the CPU and then 
jumps into the monitor or warmstarts 
the BASIC. The Commodore 64 
doesn't have a reset key — the only 
way to regain control of it once it has 
‘hung is to turn the power off! (Press- 
ing RUN/STOP and RESTORE 
doesn't always work). 

To overcome this problem we 
decided to design a more elegant 
way of regaining control of a‘hung’ 
Commodore 64 without losing the 
stored program. 


A REAL RESET 
Examination of the MOS 6510 chip 


reveals that it can be hardware reset 
by bringing the RESET pin low 
(earth). (The RESET is pin 40 of the 
chip). When the RESET pin goes 
high again (+5V) the 6510 loads its 
program counter with the contents of 


memory locations $FFFC and $FFFD. 
In other words, earthing the RESET 
pin will stop the CPU from doing 
whatever it is currently doing and will 
cause it to jump to the address con- 
tained in memory locations $FFFC 
and $FFFD. 

The obvious thing to do is to load 
memory locations $FFFC and $FFFD 
with a vector which points to BASIC’s | 
warm start. Earthing the RESET pin 
will then stop the CPU and warmstart 
BASIC. Unfortunately, the KERNAL 
ROM overlays these locations, 
making it impossible to.change 
them. The jump vector which the 
KERNAL maintains in $FFFC and 
$FFFD points to the normal ‘cold 
start routine. This is the routine used 
on power-on which resets all the 
BASIC pointers and does a RAM test 
betore coldstarting BASIC. Earthing 
the RESET pin, then, regains control 
of the machine but ‘loses’ the current 
program. 


BRING BACK BASIC 


Actually things aren't as bad as they 
seem, because the program is still 
stored in memory, it's just that BASIC 
can no longer see it. What has 
happened is that the pointers, which 
tell BASIC where the program starts 
and ends, have been reset to 
indicate that there is no program in 
memory. (Fortunately the RAM test 
which has been performed is non- 
destructive which means that it hasn't 
damaged the program!). If we can 
find a way of restoring BASIC’s 
pointers we can recover the program 
as well. 

To understand how we can 
recover the program we need to look 
at the way BASIC programs are 
stored. On the Commodore 64 
BASIC programs usually start at 
$0801 and can extend up to $9FFF. 
(Both these addresses can be moved 
but they rarely are). In addition, any 
variables and arrays are stored after 
the end of the program extending 
upwards, and strings are stored from 
$OFFF extending downwards. 
Naturally there are no variables, 
arrays or strings created until a pro- 
gram is RUN. Figure | shows the 
general storage of BASIC programs. 

BASIC maintains pointers to 
several places, the four which 
interest us here are: 

@ The start of BASIC text. This poin- 
ter is called TXTTAB and it is at 
address $2B and $2C. 

@ The start of variable space. This 
pointer is called VARTAB and it is at 
address $2D and $2E. 

@ The start of array space. This 
pointer is called ARYTAB and it is at 
address $2F and $30. 

@ The end of array space. This 
pointer is called STREND and it is at 
address $31 and $32. 
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DOWNWARDS 


STRING 
VARIABLES 
| STRINGS GROW 


NUMERIC 
VARIABLES 


ARRAYS AND 
GROW UPWARDS 


ARRAYS 


ARYTAB ——> 
NUMERIC 
VARIABLES 
VARTAB ———> 


PROGRAM 
TEXT 


Fig..1 The general storage method 
for BASIC programs on the 
j|Commodore 64. | 


Figure | also shows where these 
pointers refer to. Unless BASIC has 
been moved, TXTTAB will contain 
$0801, which is the normal start 
address of the BASIC text area. For a 
program which has never been RUN, 
VARTAB, ARYTAB and STREND will 
all point to the same place — ie the 
end of the program text. 

When the power-on routine is 
executed, TXTTAB is set to $0801 
and VARTAB, ARYTAB and STREND 





10 FOR X=@ TO 83 











#4 READ @ +: FOKE-49152+xX, @ 
4A NEXT X 


4AM IN 





IG DATA 169, 1, 133, 253,169, 9, 133, 254 


1 DATA 144, 4, 1649, @, 2@9, 25% 





?@ DATA 


»e AO, 4 


80 DATA 24, 141, 253, 145, 253, 204, 149, @ 
70 DATA 1@1, 254, 145, 253, 1468, @, 177, 253 


100 DATA 208, 27, 200, 177, 253, 208, 22, 149 






TXTTAB POINTS 
TO HE 


RE 
(USUALLY $0800) 

\ LINE NUMBER 

OF cantare. cos Tema, 


THIS POINTER 
POINTS TO HERE 








LINE NUMBER 
MST eee 


mone [ TTT 
SS eEEEEEA came 


THIS POINTER 
POINT TO HERE 









LINE NUMBER 
lactam amea 





3rd LINE 







Se 
THIS POINTER 
POINTS TO HERE 


VARTAB, ARYTAB AND STREND 
POINT HERE 





are all set to $0803 — ie no program 
in memory. What we have to do, 
then, is to find the end of the program 
and set VARTAB, ARYTAB and 
STREND to point to it. | 

Finding the end of the program is 
fairly easy because BASIC is stored 
as a linked list. This means that each 
line of a program contains a pointer 
to the next line. The last line in a pro- 
gram has two nulls ($00) in the poin- 
ter locations. Figure 2 shows how 
BASIC lines are stored in a short 
three-line program. 

When the power-on routine is 
executed the first two pointer bytes 
are set to nulls — ie no program 
stored. 
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128 








DAT 


138 





DATA 





L4@ DATA 








VOIR as 2, 201; 2535, 133,45, 433, 47 





133,49, 149, 6,161, 254, 
133, 48, 133, 3G, 946, 160, @, 177 


oud, 178, 208, 177, 253, 133, 254, 134 










La, 4h 

























Loa 








DATA 253, 56, 176, 208 
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Listing 1. The BASIC program to POKE the machine 
| code into memory. It is completely relocatable. 







1st LINE ie oie PROGRAM TEXT (IN ASCII) } 00 
ORT ST 
PROGRAM TEXT (IN ASCII) 


PROGRAM TEXT (IN ASCII) 


Fig. 2 How BASIC lines are stored in a three-line program. 
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< THERE IS ALWAYS A NULL BYTE (00) 
AT THE END OF EACH LINE 














To find the end of the program, 
we first have to find the address of 
the start of the second line (by scan- 
ning for the null at the end of the first 
line) and set $0801 and $0802 to 
point to it. ($O801 and $0802 are the 
line pointer locations for the first line). 
We can then simply run down the 
pointers looking for the two nulls at 
the end of the program. The address 
of the byte immediately following 
them is the address which must be 
poked into VARTAB, ARYTAB and 
STREND. 


MAKING THE MODS 


We now have enough information to 
enable us to implement the reset 
facility. Our first task is to wire up the 
reset key itself. The key can be of any 
type you like, although a sub- 
miniature ‘push-to-make’ type is 
probably the most suitable. It must 
be connected to the Commodore 64 
so that when operated it connects an 
earth to the RESET track. 

There are two ways of doing this: 
the first is to actually mount the 










USER PORT 
EDGE CONNECTOR , 













PIN4 PIN 3 PIN 2 






SOLDER RESET 
SWITCH TO HERE 








Fig. 3 Solder point locations for 
fitting a reset switch. 
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Software: An OLD command 








Listing 2. The assembly listing of the OLD program. 


CHD Le TEXT ; 











OLD routine for the Commodare 64 oul iy es a 
ee ee ere ae ae 9 eon STF ih LAN Tas ‘Copy preg start 








Le PTET raddress (to: LINETR, 





TPT REE 





1 OTA 







A oF fc mA ge UP arr Rae © ant ebanae Sar lag ant ePR tte Sem EUR ab Ge SOR g ‘ : Pre ates ; 
;Copyright (cd) AL. Cross 198.5 :Now restore the pointer on the first Line of 


Lthe program, CIt must point ta the second Line), 


es SCOAA Set routine start ae ve RG MRT cL, ss 
BOA RSET TOUS hart Cary ADDY BAL Minit balase inees 









LA tt BAVE ‘Search character, 






INTTEE CMF ded) oe 







‘Variables and equates EADEND ‘Scan for end of 







Ress I 





} Lane, 





TEXT si SUE TL. i 


BASIC prog start 













2 bode Cee eee 


VAR TARE = 2D ; 


SASliG variables eskart 


INT TLE 





ARY TAR. = id ;BASIC arrays start EF NDEND TINY ;Step over null, 


STREND. = oS PRAS 


a 
ae 
as 
ae 
“ 
—_ 
i 
eure 
tah 
— 
tte 


bo ae Ty 









LINE TR os RTD Pea later EEA rinitialise. index, 









;Calculate 





power 
ADC LINE TR ; value. 
‘First initialise LINFTR to point to the start CL EEE) oper low byte back 


raf the BASIC program. 


EO 





switch in the case at some con- that this will almost certainly diagram of these two methods. 
venient point and then wire it in to invalidate any guarantee on the Now on to the software. This must, 
earth and RESET. The most con- machine. of course, have been loaded before 
venient place to pick up these The second method of connect- the reset key is used (it's too late atter 
signals is on the User port. If you ing the reset key, which may not you've pressed it!). We have presen- 
take the top off the computer you will invalidate the guarantee is to wire ted the routine, which we have 
see that there are two convenient the switch to pins 2 and 6 of a DIN called OLD, in two forms. Listing | is 
soldering points just behind pins | plug. The plug and switch can then a BASIC program which will POKE 
and 3 of the User port. Pin | is the simply be plugged into the Serial the routine in, and Listing 2 is a6510 a 
earth and pin 3 is the RESET lead. port. (The earth and RESET leads assembly listing of the same routine q 
Figure 3 shows the location of these appear on pins 2 and 6 of the Serial with comments so that you can see 
solder points. Be warned, however, port). Figure 4 shows a simple how it works. : £ 
. The routine is only 84 bytes long ia 
and it can be relocated anywhere e 
METHOD 1 USING you like. (Locations below $0300 are 
ghar re ah overwritten during the power on 
Ore anneal routine). The routine is called by a q 
SYS 49152 command in our version | 

and it only takes a few milliseconds 
to run. eke 


CONCLUSION 


The Commodore 64 now has a very 
useful reset key which will always 
ne reset the processor from any state. In 
CHIP Te Pay a addition the OLD routine will recover 
DIN SOCKET & PLUG the current program, provided that 
the bug which caused the processor 
to ‘hang’ has not overwritten any 
important memory locations. 
Incidentally, the normal BASIC 
NEW command works by simply 
PIN 21 (EARTH) | METHOD 2 resetting BASIC’s pointers, so if you 
pas a ee accidentally type NEW, a call to our 
OLD routine will restore the program 


for you! (Now you know why the 
routine is called OLD)). 








PIN 40 (RESET) 
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Cd 








~ ge lh ae 











































ENE PRES. PAdd in any carry, 


Page AY ae hy parte ob eesks, 


;Now run down the Link pointers looking for the 


rend of the program, €Two consecutive mulla in 





ene 


a Oa (re Wr co a 





Line pointer loca 


Mea tN Le DY Hee Sea a PD Wg She we ee att aa Bg ee 





LL ie al Bm ne ie ES 


law noinker byhe, 


a MOTE MT HEE ete, came ee we OB Es 





TAY 


LDA CLINPTR), ¥ ;Get high pointer byte. 








ENE 





NOTE MDD Roe Rs ceria, aa oe ee Oats 


rEnd of program reached ~ address af the’ 


copy 





vhuhe 





following the two nulls to VARTAR, ARYTAE 


pand STREND, 


PStep aver two nulde. 


LN Te 


VARPTR Law pointer bute 


SPEED UP ANY BASIC PROGRAM 
WITH OUR COMPILERS _ 


COMPUTING TODAY FEBRUARY 1984 































































































PROG RAM RECOVERY 


mA aR YE TR 
ore ST REND 
LL ss PAdd an any carry, 
ADC LINE TR : 

oe Vk TAs + 1. iHigh pointer bytes, 

ST es AMY TAR + 1 

ST S TREND + ; 

RTS ;Routine finished, 
fEnd of program not reached ~ read pointer to 
next pragqram Line, 

} 
NOTEND  LDY SAG Pinitialise index, 
Tae © LOT TR DE op eee 


low pointer byte, 


TAX 


LP Cone ER OE ON Oh Gh aver bye, 
pUpdate LINETR te 
a at LN TH 


ROL LS net: Line. 


a ass Ad iRepeat, 


fein dell) Rulekes: 64 FULL IEEE 
AND RS232 


Ko) | cartridge. Cfo} aaley-lele(-muViiae any software. 


except the 700 cross- compl 


Compilers are supplied ex-stc 


| Oxford Computer Systems (Software) Ltd. 
| Hensington Road, Woodstock, Oxford OX7 1JR, England 
| Telephone (0993) 812700 Telex 83147 Ref. OCSL 
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SHARP MZ-80A 


MEMORY 
LANGUAGE 
CASSETTE 
DISC extra 
KEYBOARD 
DISPLAY eae 
INTERFACE PARAW 
GRAPHICS BLOCKW 
LINEO 
COLOUR 


48K RAM 


SOUND 


4K ROM 


Microsoft BASIC 
1200 baud (built-in) 


DOS 


QWERTYW CURSOR KY NUMERICW FUNCTO 


MONITORW/SUPPLIEDW’ 
SERIALO BUSW 
USERU 

RES 80 by 50 

TEXT 25 by 40 


Single channel 


Notes: The Sharp MZ-80A is a Z80 based micro. An expansion unit, 
printer, floppy disc unit and other peripherals are available. Other 
languages can also be used such as Pascal merely by replacing the 
tape. With the floppy disc option the machine can respond to higher 
level software such as Disc BASIC and FDOS (including BASIC 
compiler). A small range of business and educational software is 
available. The supplier is Sharp Electronics (UK) Ltd, Thorp Road, 


Newton Heath, Mancheste 


SHARP MZ-80B 


MEMORY 64K RAM 

LANGUAGE 

CASSETTE 1800 baud 
built-in 


DISC extra 
KEYBOARD 
DISPLAY ty ag 
INTERFACE }§ PARAL 
GRAPHICS 





LINEN 
COLOUR 


3 channels 


SOUND 


10 OBE. 


PORTER 





2K ROM 


BASIC (on tape) 





DOS 
OWERTYW CURSORNW NUMERICW’ FUNCTO 


MONITORNMSUPPLIED WY 
SERIALO BUSW 


BLOCK USER 


REO S20 by. 200 
LEAT 20-Dy-B0 


Notes: The Sharp MZ-80B is a Z80A based micro. Various other 
languages can be loaded as the machine is ‘soft’, no language be- 
ing fitted in ROM. Expansion unit, the MZ-80P5 printer and the MZ- 
80FB floppy disc drive are also available. The supplier is Sharp 
Electronics (UK) Ltd, Thorp Road, Newton Heath, Manchester. 





ODEALER 


BERKSHIRE 


Kuma Co moet 5 ) 
Limited 
Fully support with software and 
hardware. Sharp 700, Sharp 
MZ80A, and MZ80B. 
11 York Road, Maidenhead, 


Berks. Phone for details — 
0628 71778 












COMPUTER 100 

181 Oxford House, Reading, 
Berks RG1 7UZ 

TEL: 0734 591616 


One of the UKs largest stockists 


CAMBRIDGESHIRE 


MS CONSULTANTS 
(CAMBRIDGE) LTD 


152 High Street, Huntingdon, 
PE18 6TF. Tel: 0480 51721 
Specialists in Sharp 
Hardware & Software 


|W LANCASHIRE 
SSSR TACeL ace te ioe 


Sharp MZ-3541 Based Software, Bake- 
house Orders System, Barstock System. 


SALES — SERVICE 
SOFTWARE 

















BAR INSTRUMENT CO. LTD. 


For Sharp computers, books, software. 
Urmston Computer Centre, 
124 Flixton Road, Urmston, 

Manchester. 
Tel: 061 - 747 4626 


MICRO APPLICATION PACKAGES 
LTD. Wild Oaks Drive, Thornton, 
Blackpool FY5 5BR. Tel: 0253 866464 
Specialize in Business Programs for the 
Sharp MZ-3500 Machine. Estimating, Job 
Costing, Retail Stock Control. Also 
Graphics/Draughting Package. 


Suitable CAD/CAM use. 


SHARP CENTRE 


16 Melville Street, Lincoln. 
Tel: Lincoln 32379 


All Sharp Microcomputers. Specialists 
in Industrial Process Control Systems. 
Customers include British Telecom, 
M.O.D. CRA & CTA Members 


SHARPSOFT LTD. 


With the Sharp user in mind. For the 

keenest prices on hardware or full range 

of software contact the Sharp Computer 
Specialists: 


Sharpsoft Ltd, Crisallen House, 
86-90 Paul Street, London EC2. 
Tel: 01 - 729 5588. 









MICROS FOR MANAGERS 
149 Gloucester Rd., London SW7 4TH 


Pocket Computer Software Specialists. 
APD air conditioning/heating/ventila- 
tion design package £25 (for Sharp 
PC1251 & PC1211). Applications 
written for you. Wholesale/Retail — 
Trade enquiries welcome. Tel: 01-370 
5125 for appointment. 
















MIDLANDS 


JAXREST LTD 
Linton House, 
Catherine Street, Aston, 
Birmingham. 
Tel: 021 328 0543 
Sharp Service and Support 


NORFOLK 


GRASSROOT COMPUTERS 
25 Wellington Rd., Dereham. 
TEL: 0362 4640 


Specialist In small business Computing. 
Send for details of stockbox — the com- 
plete and thorough stock system with 
2,500 items per disc. Other modules to 
follow. 


SCOTLAND __ 


micro change Itc 


5 Annfield Place, Glasgow C31 2XN 
Tel: 041 - 554 7623 
SHARP ALTOS SUPERBRAIN 
Call us for your software and hardware 
requirements — We will tailor our data 
base to meet these. 





















LOWDATA SYSTEMS 


A division of Lowdon Bros. & Co. (Engin- 
eers Ltd). PO Box 53, Blackness Road, 
Dundee, DD1 9JG. 


Tel: (0382) 22314 
Full range of Sharp Equipment stocked 


STAFFORDSHIRE __ 


COMPUTER DISTRIBUTORS 
DISCOS LTD. 


East Cannock Road, Hednesford, Staffs 
WS11 5LT. Tel: Hednesford (05438) 2021-3 
MZ 3541 Business Computers, Peachtree 
Business Software, Financial Director 
Accounts Package, MZ 700 Wholesalers 





STEVE’S COMPUTER COMPANY LTD 
CASTLE ARCADE, CARDIFF. 
Tel: 0222 — 371578 


OPEN: Mon — Sat. 9 - 5.30 
For Components to Computers 


MICROCENTRE LTD. 
SYSTEMS, SOFTWARE 
SERVICE, SUPPORT 

28-30 Station Road, 


Bognor Regis, Sussex. 
TEL: 0243 827779 





PROGRAM 1 


For Business Software 


35 Albion Street, Hull. 
TEL: 0482 20022 






FOR DETAILS 
ON ADVERTISING IN 
MICRODEALER 
FEATURES — RING 
01 - 437 0699 

















COMMODORE 720 


MEMORY 256K 20K ROM 
LANGUAGE Commodore BASIC 
CASSETTE 300 baud | 
DISC Twin in-built floppy drives | 
KEYBOARD QWERTYMCURSORM NUMERIC MFUNCT MW 
DISPLAY TVe E> .MONITOR SUPPLIED yy 
INTERFACE PARA SERIAL v7 BUS 
GRAPHICS BLOCK USER (1) 

LINE RES 80 by 25 

COLOUR 16 TEXT 80 by 25 
SOUND Three channels 


Notes. The Commodore 720 is the top model in the 700 range 
of business machines. It is built round the 6509 processor, but 
there is a dual processor (Z80 or 8088) option. The machine 
has been designed to meet the IEC specifications. The black. 
and-white monitor screen is integral and features tilt and 
swivel. The keyboard may be detached. The dual disc drives 
are built-in to the main housing and use DMA transfer, in- 
creasing speed. 


SAAT AAR 




























COMMODORE 64 
MEMORY 64K RAM 26K ROM 
LANGUAGE PET BASIC 
CASSETTE 300 baud 
DISC extra DOS 
KEYBOARD QWERTY[MCURSORM NUMFRIC LIFUNCT& 
DISPLAY TV__M_ MONITOR SUPPLIED 
INTERFACE PARA W& SERIAL W~ BUS 
GRAPHICS BLOCK (¥@ USER WM 

LINE [] RES 80 by 25 

COLOUR 16 TEXT 40 by 25 
SOUND Three channels 


Notes. The Commodore 64 is a 6510 based micro that can also 
use Pascal, COMAL, LOGO, FORTH and PILOT. Programs 
can be loaded from cassette recorder or disc drives, both 
extra, or cartridges. The various peripherals include printer, 
joysticks and games paddles. 



































eee 


Cee Le 
re 


COMMODORE [Witelte)))4.0aa;) 


CHESHIRE 


Automated Business Equipment 
Ltd — Stockport — 061-432 0708 


CBM _ specialist for industrial 
accounts, management graphics 
and planned maintenance. 


HERTFORDSHIRE | 


Alpha Business Systems Ltd 
Church Street, Industrial Area, Ware, 
Herts. Tel: 0920 68926 


Specialists in recommending and 
Supplying complete systems for small 
businesses. 


| LANCASHIRE 


COMMODORE BUSINESS 
SYSTEMS 
Commodore Home Computers 
Software ard Hardware 
01 - 228 1637 
2/4 Oxford Road, Manchester 
M1 5QA (Opposite BBC) 











MAYFAIR MICROS 


for a full range of Commodore 

equipment at very competitive 

prices. 5th Floor, 65 Duke Street, 
London W1. Tel: 01-629 2487 


TYNE & WEAR 


KEY COMPUTER SERVICES 
LIMITED 

Micro Computer solutions to everyday 

business problems. 


Osborne House, 28 Osborne Road, 
Newcastle upon Tyne NE2 2AJ. 
Telephone: (0632) 815157 


Directors: J. Sowerby, V. Shepernson. 














SIGMA SYSTEMS LTD 


266 North Road, CARDIFF 
Tel: 621414 


Also authorised dealer for CBM 
Digital, ICM. ACT, ‘Sirius’ & 
Apricot. 


WEST MIDLANDS 


MICRO BUSINESS CENTRE LTD 
Wolverhampton Computer Centre, 17- 
19 Lichfield Street, Wolverhampton, 
West Midlands WV1 1EA. Tel: (0902) 
29907 or 29021 
Complete range of Commodore pro- 

ducts always available. 
















LUCAS 





LUCAS LX 





MEMORY 64K RAM expandable to 256K 
LANGUAGE Microsoft BASIC 
CASSETTE 300o0r 1200 baud 
DISC Single or twin 5% floppy disc drives 

DOS CP/M_2.2 (supplied) or NAS-DOS 
KEYBOARD QWERTY @CURSOR NUMERIC (FUNCT E 
DISPLAY TV MONITORMISUPPLIED Ly 
INTERFACE PARAW SERIAL [Ly BUS LY 
GRAPHICS BLOCK Y USERTY 

LINE O RES 392 by 256 


COLOUR 8 TEXT 80 by 25 


Notes. The Lucas LX is a Z80 microcomputer aimed more at 
the professional and business user. Hence 5M Winchester 
disc interfacing is provided. Popular printers may be used 
with the RS232 serial interface, and a Centronics interface is 
also provided. There is an additional parallel interface 
connector for providing up to 16 on/off signals. The monitor 
supplied as standard is a 12” monochrome version: a colour 
monitor is also available. The high res colour graphics may be 
392 by 256 in eight colours, or 784 by 256 in two colours. A 
wide range of applications software is available via the CP/M 
operating system, including Wordstar, Supercalc, and 
Calcstar. 





NASCOM 3 
MEMORY 48K RAM 10K ROM 
LANGUAGE Microsoft BASIC 
CASSETTE 300 or 1200 

baud 
DISC extra DOS CP/M or NAS-DOS 
KEYBOARD QWERTYYCURSOR OONUMERIC O FUNCTEI 
DISPLAY TV LY MONITOR WSUPPLIED O 
INTERFACE ai A SERIAL LY BUS LY 
GRAPHICS BLOC [LY USERLY 

LINEO RES 800 by 256 

COLOUR 8 TEXT 25 by 80 
SOUND Three channels 


Notes. The Nascom 3 is a Z80 based micro. A second version 
of BASIC and Pascal are also available, as are a cassette 
recorder and light pen. 














TARGET ELECTRONICSLTD 
16 Cherry Lane, Bristol. 
Tel: (0272) 4214196 


80-BUS SOLUTIONS 


BUCKS 


AMERSHAM COMPUTER CENTRE 
18 Woodside Road, Amersham, Bucks. 
Tel: (2403) 22307 


80-BUS SOLUTIONS 


















S & R BREWSTER LIMITED 
86-88 Union Street, Plymouth PL1 3HG 
Tel: 0752 665011 Open: 6 days 


DORSET 


PARKSTONE COMPUTER SYSTEMS 

Main Nascom Dealer & Service Centre 

Also Dealers for Gemini, Transtec, 
Genie 










18 Station Road, Lower Parkstone, 
Poole, Dorset BH14 8UB. 


Tel: PARKSTONE (0202) 746555 






ZIPPY ELECTRONICS 


West Dorsets Nascom Dealer 
Business and Personal Computer 
Systems,. Printers, Software. Tel: 

Bridport (0308) 56539 
Mail Order Service operated. 
Access/Barclaycard accepted. 







NORTHERN IRELAND J | 





MICRODEALER§ 


AVON LONDON : 










HENRY’S RADIO 
404 Edgware Road, London W2. 
Tel: 01-402 6822 


80-BUS SOLUTIONS 





BALLYCARRY 
NEWBURN CO ANTRIM 


6 days until 8 pm. Gemini, Galaxy, 
Nascom, Acorn Computers. Discs, 


monitors, printers, servicing, hire. 
Industrial Control. Accounts, Word 
Processors. 
WHITEHEAD 78330 


DEVON NOTTINGHAMSHIRE 


PLYMOUTH’S 








COMPUTERAMA, (Skytronics Ltd.) 
357 Derby Road, Nottingham 
; Tel: (0602) 781742 


BUS SOLUTIONS 


M.D.W. ELECTRONICS |, 


47 Woodbridge Rd. East, Ipswich 
IP4 5QN. 
Tel: (0473) 78295 


Nascom, Nasbus, Gemini, Multi- 
board Stockists. 










SURREY 






MicroValue 


ELECTROVALUE LTD 
28 St. Judes Rd, Englefield Gn, Egham, 
Surrey. Tel: (07843) 3603 


80-BUS SOLUTIONS 










| | HUMBERSIDE WALES 


TOMORROWS WORLD 
The sole Nascom Agent for North 
Humberside. 


15 Paragon Street, Hull HU1 3NA. 
TEL: 0482 24887 


EYTE-RITE 


Llandaff R & TV Ltd, 24-26 High St., 
Llandaff, Cardiff. Tel: 0222 563760 


Nascom, Gemini, Lucas Logic, C.A.D., 
Networks, Dragon, Peripherals. 





LANCASHIRE I WaRWicksHine 





MicroValue 


EV COMPUTING 
700 Burnage Lane, Manchester M19. 
Tel: 061-431 4866 


80-BUS SOLUTIONS 










BUSINESS & LEISURE 
MICROCOMPUTERS 
16 The Square, Kenilworth, 
Warwickshire CV8 1EB 
Tel: 0926 512127 

We are the largest Lucas Nascom 
dealer in the UK and carry the greatest 
variety of products for this range of 
computers. 





















He} late) YORKSHIRE 






OFF RECORDS 
Computer House, 58 Battersea Rise, 
Clapham Junction. Tel: 01-223 7730 


80-BUS SOLUTIONS 













LEEDS COMPUTER CENTRE 
55 Wade Lane, Merrion Centre, Leeds. 
Tel: (0532) 458877 


80-BUS SOLUTIONS 






SEE YOUR BUSINESS GROW 
PHONE ASP LTD ON 
01 - 437 0699 









































Lineage: 35p per word. 





Semi display: £8.00 per single column centimetre 
Ring for information on series bookings/discounts. 


All advertisements in this section must be prepaid. 
Advertisements are accepted subject to the terms andconditions 
printed on the advertisement rate card.(available on request). 





SOFTWARE 
IN -Y-YR ey Wale) 


48K SPECTRUM & BBC 


POOLS 
PREDICTOR 


An easy to use and very powerful fore- 

casting program: using 6 different 

methods of prediction, based on 
analysis of. current form. £4.99 


MAYDAY SOFTWARE 
Dept CT, 181 Portland Crescent, 
Stanmore, Middlesex HA7 1LR 


CORTEX — FORTH 


For fig-forth with extensions for 

Cortex. Colour Computer. 16K 

Supplied in two 2564 Eproms. Re- 
places 1st two Basic Eproms. 


£35 INCLUSIVE 


LOMBARD SYSTEMS 
18 Lombard Street, Lidlington, 
Bedford MK43 ORP. 


TRS-80 MODEL | 
_ 1500 BAUD CASSETTE 
SPEED-UP UTILITY 


| Load and Save Programs at 3 times 
normal speed! 


e No hardware modes needed 
e Works on BASIC & SYSTEM 
programs i 
e Displays program as it loads 
e Programs canbe up to 14.5K long 
(16K Level II only) 


£7.50 inc p&p to: 


D JACKSON (Software) 
37 Sandhurst Road, Bexley, 
Kent. 

Tel: 01 - 304 3991 


DRAGON ADVANCED 
PROGRAMMER’S PACKAGE 


The most comprehensive FORTH im- 
plementation on the market, suitable 
for 32K and 64K. Includes the language 
itself which can access Basic com- 
mands, powerful text editor, 6809 
macroassembler, extensive documen- 
tation and the fig-FORTH Installation 
Manual. Plus: Dragon Companion 
Book containing full 6809 dissassemb- 
ler, extensive memory map, many tips 
to get the most from your Dragon. 

Excellent value at only £15 inc. 

M & J Software, 34 Grays Close, 
, Scholar Green, Stoke-on-Trent. 

(0782) 517876 





SOFTWARE 
LANGUAGES 









BackFORTH 
FORTH for NASCOM'’s, 32K min, | 
written in Z80 code (NASCOM 1 
with NAS-SYS and Cottis Bland- 
ford). Supplied as a tape based 
system (pseudo disc in RAM). 


BackFORTH features include: 


Editor, ‘screen and line based, 
modes. Versatile debugger to 
enable single stepping through, 
FORTH secondaries or machine 
code. Macro assembler, Z80 style 
mnemonics and high level 
constructs. 32 bit integer extension. 
Hashed directory, enabies fast 
searches for the 380+ words. Inter- 
faces to NAS-SYS routines. The 
documentation (approx 150 
pages) includes glossary, source 
listings, memory map and defini- 
F tions to provide figFORTH simu- 
lation. Available now at £28.75 in- 
clusive or send SAE for further 
' details. 
Dept CT1, Southdown Computer Ser- 
vices, Manresa, Cooksbridge, Lewes, 
East Sussex BN8 4SP. — 





















SOFTWARE 
GAMES 








GROVE SOFTWARE 






Games for the Jupiter Ace 
with 16K 


Mastermind + Bomber 
Pairs + Submarines 


£5.50 each inc p&p 
SAE for Catalogue. 
Cheques and PO's to: 


GROVE SOFTWARE 
2 Grove Court, Oakfield Road, 
Penge, London SE20 8RG. 






TBT 1 
Tel 2 









ATOM OWNERS BEWARE. The 


Swarm approaches. Destroy their: 


dynamic waves or be doomed. Hall 
of Fame, sound, m/c 12K. £4.95. 
M.J.R. Software, 4 Fulbeck 
Avenue, Leicester. 


SOFTWARE 
EDUCATIONAL 


ISIS VIDEO 
Specialists in Educational Software, 
Software and  Textbooks/Software 
Packages from ABC to A-Level. Many 
major publishing houses included in 
our comprehensive catalogue covering 
most popular home and_= school 
computers. Ring Fiona Brooks now on 
01 - 549 9305, or write stating model to 
Isis Video (Dept CT), Crown Works, 
Kingston, 


Church Road, Norbiton, 
j Surrey KT1 30B 


COMPUTING TODAY 








Oe 





~ 01-437 0699 


Send your requirements to: 
MARK BECAREVIC co is 
ASP LTD, 1 GOLDEN SQUARE, 
LONDON W1_ er 


) Xoloj A-\-Y0) -1 | 


CHILTERN ELECTRONICS 


Amazing Value in Video Monitors 
Professional quality equipment by AGC 
Corp ideal for your micro. Look at these 
features: * Superb resolution for graphics, 
80 col. etc * Bandwidth 10hz-22Mhz * 
Green Screen P31 phorsphor * Antiglare 
tube * Attractively styled case * 
Composite video mains operation. 

Available in 9 "* Model HM911 £85. 

12” Model HM123 £89, 


FANTASTIC KEYBOARD BARGAIN!! 
Scoop purchase allows us to offer a 49 
key QWERTY layout, ASCII encoded 
keyboard. Fully cased, used but 
guaranteed working. Full logic 
diagrams and information supplied. 
ONLY £15. Add carriage £1.85 and VAT. 
Educational discounts, Access welcome. 
Same day despatch. Call Gary Kent on 





















Giles, Bucks HP8 4HQ. Telex: 262284. 


BLANK CASSETTES! 


TOP QUALITY PROFESSIONAL 
BRAND COMPUTER/AUDIO 
CASSETTES AT BUDGET 
PRICES 


Packed in boxes of 10 cassettes 

complete with labels, inlay cards 

and library cases. Prices include 
VAT post & packing 

















Length Box Qty Amount 
Price 
(10) 

5 min £4.85 

10 min £4.90 

12min £4.95 

15 min.«: £5.00 

30 min ‘£5:20 

60 min» £5.80 

90 min £7.50 


Cheque/Postal Order enclosed for £ 


PROFESSIONAL MAGNETICS LTD 






Tel: (0532) 706066 
TRADE ENQUIRIES WELCOME 









NEWBRAIN 


The professional micro computer for 

the price of the hobby machine. 

Delivery free. Call us for very special 
offer. Mail Order. Access. 

Call Stevenage (0438 812439) 
Anytime for the latest details of 
Newbrain Hardware, Software, Books, 
“Newbrain Dissected” Book £9.00, tape 
£9.95 and both £18.45. “Getting More 
from your Newbrain” £7.50. All include 
p/p. Epson, CPAT, Juki & KDC printers, 
monitors & recorders. Chess £14.95. 


ANGELA ENTERPRISES 


4 Ninnings Lane, Rabley Heath, 
Welwn, Herts AL6 9TD. 

















FUTURE 
TECHNOLOGIES 


(ET!) 1 Hollybrook Road, Shirley, 

Southampton SO1 6RB 

CBM 64 Computer.................... 

80 Column Board for 64............ 

with cassette & 2 blank tapes .... 

VIC 20 starter pack... 

Tapes £1 ea 

48K £129.95 


Cassette alone £44.90 
Spectrum 16K £99.95 
Also Atari, Texas, accessories, soft- 
ware. Cheque/PO with order: 
Send large SAE for lists (23p stamp) 
Ad £1 P&P for orders under £50 
All prices include VAT 










02407 71234. High Street, Chalfont St - 


Cassette House, 329 Hunslet Rd; Leeds. 














| ELIMINATE 


FAULTY 
CASSETTES 





































DataClone is the first 
company in the UK established 
specifically for the duplication 
of data cassettes. 











All other duplicating houses 
are audio orientated — only 
DataClone has a duplicating 
system designed from scratch 
purely to handle computer 
information. 


The result? 


Greatly improved reliability in 
data transfer rates from 300 to 
beyond 2400 baud — pre- 
viously ‘unattainable. 


All formats catered for. 
Quantities from 100 to infinity. 


Contact us now for brochure. 


DataClone — _ the _ first 
specialist service for computer 
cassettes. 
















































DATACLONE 


Unit 1, Roslin Square, Roslin Rd., 
Acton, London W3. 


Tel: 01-723 0477 Telex: 21879 





WHICH COMPUTER? Hobbyist 
or Business. For individual assess- 
ment from non-dealer forward £3 
together with name and address to: 
C & S Advisory Services, 144 
Sutcliffe Avenue, Grimsby, South 
Humberside DN33 1AP. 


SPECTRUM 48K. Brand new plus 
five games cassettes. £115. Tel: 











evenings 061 748 2175. 
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: ADD-ONS 


48K and 16K SPECTRUM 


FOR SALE 


NASCOM 1, Hobbit = micro- 
cassette deck, 48K, Zeap,. 


graphics, Eprom programmer etc. EPSOM CARD (4K) | f 
£195 ono. Macclesfield (0625) The Eprom Card uses spare ROM 


12988 EVENINGS. space. so normal operation. of 
Spectrum is not affected. Prices: Edge 
Connector Version (plugs directly into 
Spectrum £21.25. Motherboard 
Version £18.50. CTR Motor Controller 
Option + £3.45. Plug in RAM + Adaptor 
£9.95. Programmers Eprom (£9.95). 
Ten. Top Quality, User-Friendly 


LIBRARIES | 


THE MZ80K/A 
SOFTWARE LIBRARY 


Choose from 150 titles. These :in- 
clude exciting Arcade/Adventure 
games, and Educational/Business 
applications. Once only member- 
ship fee. £5.00. Hire charges only 
90p per 14 day period. Plus your first 
5 games FREE. Send now for free 




















































NASCOM-2 NAS-SYS-3,. 32K- 
RAM, NAS-DIS NAS-ASS NAS- 
PEN NAS-DRAW 8K. Basic 
graphics, PSU, full documenta-tion 
tapes, £330 ono. Phone evenings 
0933 678421. 





SHARP MZ80K software for sale. 
Worth £100 plus. Only £30 the lot. 
Phone 01-472 1331 for details. 


Everlasting alternative to the Pill. . 
No fuss. No waiting lists. One visit. Low cost. in. . ! 





illustrated catalogue to: BIRMINGHAM = LONDON PLYMOUTH Routines. Right & Left Scroll, Size, 

: 5 GLOUCESTER MANCHESTER SOUTHAMPTON Memo ry, Renumber ( inc. G OT OQ, 

The Yorkshire Software Library, TANGERINE MICROTAN, Tan- ae — SWANSEA GOSUB etc), Variables Dump, Word 
13 Park Top, Pudsey, ex, hi-res graphics board, Basic, X v-tonigee 98 hereon processor, Block Delete, Sprite (Uni- | @ 

: ; : ‘ ; Write today. Booklet by return. Plain cover. Or phone versal Character Printer), Graphics 

Yorkshire (528 BY. Bug, keyboard, PSU. £140 ono. LONDON 01-388 2585 Sat New! 2% Spettrum, (Eprom PRG 

Ramsey (Cambs) 831552. LEEDS 0532 440685 grammer £28.75) and 25 volt P.S.U. 

. MANCHESTER 061 832 4260 (£7.75). Dissassembler Eprom (£9.95). 

CARTRIDGE CITY will rent Atari- ee 













, Programmer and Toolkit Eprom. SAE 
please for extra details. P&P 75p (UK) 
£2.00 (overseas). Orme Electronics, 2 
Barripper Road, Camborne, Cornwall. 

Tel: 0209 715034 or 087 257 2842 


Name 


Hard disc drive symbiotic 5 
megabite Winchester plus 
Apple ll interface formatted. 
Offers on £950. 


TEL: Weymouth (03057) 74447 


400 and 800 owners cartridges at 
low rates. Discounts on software 
purchases. Details trom Cartridge 
City, 25 Gaitside Drive, Aberdeen 
AB1 7BH. 











AGGIES S 4 2 2 ee 










CT1 







nae Marie Stopes House, 
il 108 Whitfield St., London W1P 6BE 
Caring clinics since 1925 











When placing your ad, please.state classifi- 
cation required. 35p per word: 

Send to: ASP Classified, 1 Golden Square, 
London W1. 


Tel: 01 - 437 0699 





















illite aie hata Sea eke ne ea eva scmi MLL MSN GL Tce as Cosh 

Ce ee ca ae ae ee SO) Me ee, ee Ge TAN Les aT TN TN TORT fut anh ck OPN Air ae ees TEN DS Se 
Yils eu MA cee Dk JU Tosh Sai Moet aa ae feet Me MM A WO ce Mee eee cat eer re Ye ae eS ag hy gee i eer St mie oes Wim ae 
26) we elbow Lee pei verce fe Se Bee) ese me le ie, ee), eh ee ce ee eee om ee eee) ee 


so | -mme) |>lo) AB aL eliane: Secraas 
HOME COMPUTER J | Computes: 


A SELECTION FROM OUR EXTENSIVE STOCK 
* TEXAS SPECIAL OFFER PACKAGE 


T199/4A Computer + Extended Basic Bee ade Delivery £165. 95 
whilst stocks last. 


Titch Software for T199/4A Hangman/Victory 4: Super Value at 
£8.00. 


Protek Spectrum Joystick Interface £14.95 inc. P&P. Uses most 
switch type Joysticks. 


New Oric Joystick interface £14.95 inc. P&P. 


New MCP-40 Centronic 4 Coloured Printer fits most personal 
Micros £149.95 inc. P&P. 


ZX Spectrum & BBC Upgrades 


Now in stock DRAGON DISC DRIVES £275.00 + £5. Delivery 


— New low prices on Texas T|199/4A. Contact us first. 
fn ei i i ‘he i em i, sm, s,s | 

Sit: See: iin: sian: sien sli im, satin, wie, aime, stem, a Are you short of a cassette recorder for Xmas — for your computer 
sar a i; wi wi, win, mi n i mm om, am cane ween 


MERE MTT ee 


Send Cheque with order made payable to AB & C Computers 
Duchy House, 6 Lower Ayimer Square, St Austell, Cornwall. 


ra Tee Ee eee 
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LUMPUTAMART 


AT A GLANCE...AT A GLANCE...ATA GLANCE...AT A GLANCE...AT A GLANCE...AT A GLANCE... 





BERKSHIRE _ 


oo! 
ICrO PRINTER 
eneral SPECIALISTS 
__ Call for advice on printer selection. 
Epson & Microline stockists. Interfaces & cables 
available for all popular micros. 
6 THE BIRCHWOODS, TILEHURST, READING. 


TEL: 0734 25226 = 


7 | 












Churchfield Ra., 
4 ~Frodsham. 
3 Tel: (0928) 35110 










Open: 6 days 9-6. Retail and Wholesale. Apple Il & Ill, 
Atom, BBC, VIC20/64, Newbrain, Dragon 32, Electron, 
Spectrum, All accessories. Easy parking off M56. 






Computer 
dunk Shop 


We Buy, Sell, Break Computers & Peripherals. 
10 Waterloo Rd, Widnes, Halton. Tel: 051 420 4590. 


_ CORNWALL/DEVON 


A. B. & C. COMPUTERS (CT) 


Duchy House, 6 Lower Aylmer Sq., St. Austell. 
Tel: 0726 64463/67337 
Wide range of popular Micros, Printers, books and 
accessories. We stock all U need — try us first for 
service and competitive prices 








PLYMOUTH’s NAasSCOM 
DEALER 
S & R BREWSTER LIMITED 


86-88 Union St., Plymouth PL1 3HG. 
Tel: 0752 665011 Open: 6 days. 


DORSET 


ZIPPY ELECTRONICS 


West Dorsets Nascom Dealer 


Business and Personal Computer Systems, 
Printers, Software. Tel: Bridport (0308) 56539 


Mail Order Service, operated. 
Access/ Barclaycard accepted. 


















HERTFORDSHIRE 


NEWBRAIN SPECIALISTS 
HARDWARE & SOFTWARE 
Printers, Epson, Shinwa, Juki etc. Monitors, Tape 
Recorders, Books, Expansions, CP/M. Mail Order, 
Access. 2 new books — see classified ad for details. 

Chess in stock £14.95 
ANGELA ENTERPRISES 
Tel: Stevenage (0438) 812439 anytime 


NORTH KENT 


MEDWAY COMPUTERS 


141 NEW ROAD, CHATHAM. 

Tel: 0634 826080 

Open Mon-Sat 10 - 5. Closed Weds. 
Most computers and software stocked. 
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|SHARP CENTRE Mie 


LANCASHIRE 













51 QUEEN STREET, MORECAMBE. 
Tel: 411435. Also open Sundays. 
Sinclair, Commodore, Acorn/BBC + Dragon. 
Authorised dealer for Bug-Byte, Imagine, Quicksilva. 
Artic, Melbourne House, Silversoft etc. 













LEIGH COLOUR 
LABORATORY LTD 
87 Chapel St., LEIGH, 
Tel: 0942 607661 

Open: 9 — 5.30. 






29 Hanging Ditch, Manchester. 
Tel: 061 832 2269 

Open: Mon-Fri 9.30am-5.30pm. 

Sat 10-5. Retail and Wholesale. 


LINCOLNSHIRE 










16 Melville Street, 
Lincoln. 

Tel: Lincoln 32379. 
Open: 9am-5.30pm closed Wed. 


Ke) \\[ye),\ 


HENRYS COMPUTER SHOP 


404-406 Edgware Road, London W2 1ED. 

Tel: 01-402 6822 
Open: 6 days a week. Order by phone or call 
in and see for yourself. 



















BUTESHOP comeuteriano 


324 Euston Road, NW1. 
Tel: 01-387 0505. 
Open: Mon-Fri 9am-5.30pm. 
(C.R.A. member) 






SOUTH LONDON 


CROYDON COMPUTER CENTRE 


29a Brigstock Rd., Thornton Heath 


Surrey. Tel: 01-689 1280 
BBC, Acorn, NewBrain, Genie, Oric. 
Kaga Microvitek Zenith Monitors. OKI 
80, 82A + 84 Printers. Paper Ribbons, 


Software etc. etc. BUY/HIRE. 


MIDDLESEX 


L.B. ELECTRONICS 
11 Hercies Rd, Hillingdon. 





Tel: Uxbridge 56399 (24hr ans. service) 
Open: 6 days, 9.30am-6pm, (lunch 1-2.15 except Sat) | 
Surplus equipment, memory, EPROMs etc. Also 
established mail order service. 





NORFOLK _ 


ANGLIA COMPUTER CENTRE 


88'St Benedicts Street, 
Norwich. 

Tel: (0603) 29652/26002. 

Open: 6 days 9am-5.30pm. 















NORTHAMPTONSHIRE 


NORTHAMPTON 
HOME COMPUTER CENTRE 
S8A Wellingborough Road, Northampton. 
Tel: (0604) 22539 


Open: 6 days a week from 10 - 6 














NORTHERN IRELAND 


NEWBURN colsnrin 

Co. Antrim 
6 Days until 8pm. Gemini, Galaxy, Nascom, 
Acorn Computers. Discs, monitors, printers, 


servicing, hire. Industrial Control. Accounts, 
Word Processors etc. 


WHITEHEAD 78330 


SCOTLAND | 


VICTOR MORRIS GLascow 


TANDY TRS 80, VIC 20, VIDEO GENIE, APPLE 
PANASONIC, CUMANA, EPSOM ETC. 


















340 Argyle Street, Glasgow G2: 041 221 8958 


STAFFORDSHIRE 


COMPUTER CABIN 


24 The Parade, Silverdale, Newcastle. 
Tel: 0782 636911 


VIC-20, ZX81 hardware and software. BBC, Atom, 
Spectrum software. 












Sap 
shi Go ayy ahd 
‘56-58 South Street, 
Eastbourne. 

‘Tel: Eastbourne (0323) 639983 /20496 
Open: 6 days 9am-5.15pm. 










24 Gloucester Road, Brighton. 
Tel: 0273-698424. 
Open: Mon-Fri 10am-5.30pm, 
Sat 9am-5.30pm. 


TYNE AND WEAR 


HCCS associates 
933 Durham Rd., Low Fell, 
Gateshead. Tel. Newcastle 821924. 
Open: 6 days 9Yam-5.30pm (Sat 
10am-5.30pm). Specialists in: Acorn, 
BBC, Video Genie, VIC 20. 
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SUPERSO 


The Best Ot Software 


SUPERSOFT, Winchester House, Canning Road, Wealdstone, Harrow, Middlesex, HA3 7SJ Telephone: 01-861 1166 


i ie i Ra a i ati | a ae a ae aa ill eal lias 3 me _ 
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